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


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

/* { dg-set-target-env-var OMP_ALLOCATOR "omp_large_cap_mem_alloc" } */
/* { dg-set-target-env-var OMP_DISPLAY_ENV "true" } */

/* { dg-output ".\\\[host\\\] OMP_ALLOCATOR = 'omp_large_cap_mem_alloc'.*" } */

#include <omp.h>

int
main ()
{
  omp_allocator_handle_t m = omp_get_default_allocator ();
  if (m != omp_large_cap_mem_alloc)
    __builtin_abort ();
  return 0;
}