]> git.ipfire.org Git - thirdparty/gcc.git/blame - gcc/testsuite/gcc.dg/gomp/attrs-15.c
testsuite: Refer more consistently to C23 not C2X
[thirdparty/gcc.git] / gcc / testsuite / gcc.dg / gomp / attrs-15.c
CommitLineData
40b9af02 1/* { dg-do compile } */
54bac0ce 2/* { dg-options "-fopenmp -std=c23" } */
40b9af02
JJ
3
4#pragma omp begin assumes absent (target)
5#pragma omp begin assumes absent (target)
6[[omp::directive (begin assumes absent (target))]];
7int a;
8[[omp::directive (end assumes)]];
9#pragma omp end assumes
10#pragma omp end assumes
11[[omp::directive (begin assumes absent (target))]];
12int b;
13#pragma omp end assumes /* { dg-error "'begin assumes' in attribute syntax terminated with 'end assumes' in pragma syntax" } */
14#pragma omp begin assumes absent (target)
15int c;
16[[omp::directive (end assumes)]];/* { dg-error "'begin assumes' in pragma syntax terminated with 'end assumes' in attribute syntax" } */
17#pragma omp begin assumes absent (target)
18[[omp::directive (begin assumes absent (target))]];
19int d;
20#pragma omp end assumes /* { dg-error "'begin assumes' in attribute syntax terminated with 'end assumes' in pragma syntax" } */
21#pragma omp begin assumes absent (target)
22int e;
23[[omp::directive (end assumes)]];/* { dg-error "'begin assumes' in pragma syntax terminated with 'end assumes' in attribute syntax" } */
24#pragma omp end assumes
25[[omp::directive (begin assumes absent (target))]];
26[[omp::directive (begin assumes absent (target))]];
27int f;
28#pragma omp end assumes /* { dg-error "'begin assumes' in attribute syntax terminated with 'end assumes' in pragma syntax" } */
29#pragma omp begin assumes absent (target)
30int g;
31[[omp::directive (end assumes)]];/* { dg-error "'begin assumes' in pragma syntax terminated with 'end assumes' in attribute syntax" } */
32[[omp::directive (end assumes)]];
33[[omp::directive (begin assumes absent (target))]];
34#pragma omp begin assumes absent (target)
35int h;
36#pragma omp end assumes
37#pragma omp end assumes /* { dg-error "'begin assumes' in attribute syntax terminated with 'end assumes' in pragma syntax" } */
38#pragma omp begin assumes absent (target)
39[[omp::directive (begin assumes absent (target))]];
40int i;
41[[omp::directive (end assumes)]];
42[[omp::directive (end assumes)]];/* { dg-error "'begin assumes' in pragma syntax terminated with 'end assumes' in attribute syntax" } */