gcc/testsuite/c-c++-common/gomp/allocate-8.c


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

#pragma omp requires dynamic_allocators
void
foo ()
{
  int a = 10;
#pragma omp parallel private (a) allocate(a)
  a = 20;
#pragma omp target
  {
    #pragma omp parallel private (a) allocate(a)
    a = 30;
  }
#pragma omp target private(a) allocate(a)
  {
    a = 40;
  }
}