blob: 41d7e6bd194209d3486bbea854b7238ca86ed0b3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
/* Miscellaneous tests where clause parsing is expected to fail. */
void
f (void)
{
int i;
#pragma acc parallel one /* { dg-error "expected an OpenACC clause before 'one'" } */
;
#pragma acc kernels eins /* { dg-error "expected an OpenACC clause before 'eins'" } */
;
#pragma acc data two /* { dg-error "expected an OpenACC clause before 'two'" } */
;
#pragma acc parallel
#pragma acc loop deux /* { dg-error "expected an OpenACC clause before 'deux'" } */
for (i = 0; i < 2; ++i)
;
}
void
f2 (void)
{
int a, b[100];
#pragma acc parallel firstprivate (b[10:20]) /* { dg-error "expected ... before ... token" } */
;
}
|