aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/c-c++-common/goacc/clauses-fail.c
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" } */
  ;
}