2 #pragma acc declare create(i)
9 #pragma acc parallel /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
11 #pragma acc kernels /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
13 #pragma acc data /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
15 #pragma acc update host(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
16 #pragma acc enter data copyin(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
17 #pragma acc exit data delete(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
18 #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
19 for (i
= 0; i
< 2; ++i
)
24 for (i
= 0; i
< 3; i
++)
26 #pragma acc parallel /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
28 #pragma acc kernels /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
30 #pragma acc data /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
32 #pragma acc update host(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
33 #pragma acc enter data copyin(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
34 #pragma acc exit data delete(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
35 #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
36 for (i
= 0; i
< 2; ++i
)
43 #pragma acc parallel /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
48 #pragma acc kernels /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
53 #pragma acc data /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
58 #pragma acc update host(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
62 #pragma acc enter data copyin(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
66 #pragma acc exit data delete(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
70 #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
71 for (i
= 0; i
< 2; ++i
)
78 #pragma acc parallel /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
80 #pragma acc kernels /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
82 #pragma acc data /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
84 #pragma acc update host(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
85 #pragma acc enter data copyin(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
86 #pragma acc exit data delete(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
87 #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
88 for (i
= 0; i
< 2; ++i
)
94 #pragma acc parallel /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
96 #pragma acc kernels /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
98 #pragma acc data /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
100 #pragma acc update host(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
101 #pragma acc enter data copyin(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
102 #pragma acc exit data delete(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
103 #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
104 for (i
= 0; i
< 2; ++i
)
110 #pragma acc parallel /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
112 #pragma acc kernels /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
114 #pragma acc data /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
116 #pragma acc update host(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
117 #pragma acc enter data copyin(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
118 #pragma acc exit data delete(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
119 #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
120 for (i
= 0; i
< 2; ++i
)
126 #pragma acc parallel /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
128 #pragma acc kernels /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
130 #pragma acc data /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
132 #pragma acc update host(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
133 #pragma acc enter data copyin(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
134 #pragma acc exit data delete(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
135 #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
136 for (i
= 0; i
< 2; ++i
)
142 #pragma acc parallel /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
144 #pragma acc kernels /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
146 #pragma acc data /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
148 #pragma acc update host(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
149 #pragma acc enter data copyin(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
150 #pragma acc exit data delete(i) /* { dg-error "OpenACC construct inside of non-OpenACC region" } */
151 #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
152 for (i
= 0; i
< 2; ++i
)
158 #pragma acc parallel /* { dg-error "OpenACC .parallel. construct inside of OpenMP .target. region" } */
160 #pragma acc kernels /* { dg-error "OpenACC .kernels. construct inside of OpenMP .target. region" } */
162 #pragma acc data /* { dg-error "OpenACC .data. construct inside of OpenMP .target. region" } */
164 #pragma acc update host(i) /* { dg-error "OpenACC .update. construct inside of OpenMP .target. region" } */
165 #pragma acc enter data copyin(i) /* { dg-error "OpenACC .enter data. construct inside of OpenMP .target. region" } */
166 #pragma acc exit data delete(i) /* { dg-error "OpenACC .exit data. construct inside of OpenMP .target. region" } */
167 #pragma acc loop /* { dg-error "loop directive must be associated with an OpenACC compute region" } */
168 for (i
= 0; i
< 2; ++i
)
174 f_acc_parallel (void)
178 #pragma omp parallel /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
184 #pragma omp for /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
185 for (i
= 0; i
< 3; i
++)
191 #pragma omp sections /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
199 #pragma omp single /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
205 #pragma omp task /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
211 #pragma omp master /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
217 #pragma omp critical /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
223 #pragma omp ordered /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
229 #pragma omp target /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
231 #pragma omp target data map(i) /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
233 #pragma omp target update to(i) /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
242 #pragma omp parallel /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
248 #pragma omp for /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
249 for (i
= 0; i
< 3; i
++)
255 #pragma omp sections /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
263 #pragma omp single /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
269 #pragma omp task /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
275 #pragma omp master /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
281 #pragma omp critical /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
287 #pragma omp ordered /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
293 #pragma omp target /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
295 #pragma omp target data map(i) /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
297 #pragma omp target update to(i) /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
306 #pragma omp parallel /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
312 #pragma omp for /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
313 for (i
= 0; i
< 3; i
++)
319 #pragma omp sections /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
327 #pragma omp single /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
333 #pragma omp task /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
339 #pragma omp master /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
345 #pragma omp critical /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
351 #pragma omp ordered /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
357 #pragma omp target /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
359 #pragma omp target data map(i) /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
361 #pragma omp target update to(i) /* { dg-error "non-OpenACC construct inside of OpenACC region" } */
370 for (i
= 0; i
< 2; ++i
)
372 #pragma omp parallel /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
377 for (i
= 0; i
< 2; ++i
)
379 #pragma omp for /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
380 for (i
= 0; i
< 3; i
++)
385 for (i
= 0; i
< 2; ++i
)
387 #pragma omp sections /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
394 for (i
= 0; i
< 2; ++i
)
396 #pragma omp single /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
401 for (i
= 0; i
< 2; ++i
)
403 #pragma omp task /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
408 for (i
= 0; i
< 2; ++i
)
410 #pragma omp master /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
415 for (i
= 0; i
< 2; ++i
)
417 #pragma omp critical /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
422 for (i
= 0; i
< 2; ++i
)
424 #pragma omp ordered /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
429 for (i
= 0; i
< 2; ++i
)
431 #pragma omp target /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
433 #pragma omp target data map(i) /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
435 #pragma omp target update to(i) /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */
443 #pragma omp target /* { dg-error "non-OpenACC construct inside of OpenACC routine" } */