|  | /* { dg-set-target-env-var OMP_ALLOCATOR "omp_cgroup_mem_alloc" } */ | 
|  | /* { dg-set-target-env-var OMP_DISPLAY_ENV "true" } */ | 
|  |  | 
|  | #include <string.h> | 
|  | #include <stdlib.h> | 
|  | #include <omp.h> | 
|  |  | 
|  | 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; | 
|  | } |