1 /* { dg-do run } */
2 /* { dg-set-target-env-var GOMP_NVPTX_JIT "-O0" } */
3
4 #define n 32
5
6 int
7 main (void)
8 {
9 int arr_a[n];
10
11 #pragma acc parallel copyout(arr_a) num_gangs(1) num_workers(1) vector_length(32)
12 {
13 #pragma acc loop vector
14 for (int m = 0; m < 32; m++)
15 ;
16
17 #pragma acc loop vector
18 for (int m = 0; m < 32; m++)
19 arr_a[m] = 0;
20 }
21 }