libgomp/testsuite/libgomp.c/allocator-1.c

   1 /* { dg-set-target-env-var OMP_ALLOCATOR "omp_large_cap_mem_alloc" } */
   2 /* { dg-set-target-env-var OMP_DISPLAY_ENV "true" } */
   3
   4 /* { dg-output ".\\\[host\\\] OMP_ALLOCATOR = 'omp_large_cap_mem_alloc'.*" } */
   5
   6 #include <omp.h>
   7
   8 int
   9 main ()
  10 {
  11   omp_allocator_handle_t m = omp_get_default_allocator ();
  12   if (m != omp_large_cap_mem_alloc)
  13     __builtin_abort ();
  14   return 0;
  15 }