/* { dg-set-target-env-var OMP_ALLOCATOR "omp_cgroup_mem_alloc" } */ /* { dg-set-target-env-var OMP_DISPLAY_ENV "true" } */ #include #include #include int main () { const char *p = getenv ("OMP_ALLOCATOR"); if (p && strcmp (p, "omp_cgroup_mem_alloc") == 0) { if (omp_get_default_allocator () != omp_cgroup_mem_alloc) abort (); #pragma omp parallel num_threads (2) { if (omp_get_default_allocator () != omp_cgroup_mem_alloc) abort (); #pragma omp parallel num_threads (2) { if (omp_get_default_allocator () != omp_cgroup_mem_alloc) abort (); } } } return 0; }