/* Miscellaneous tests where clause parsing is expected to fail. */ void f (void) { int i; #pragma acc parallel one /* { dg-error "expected '#pragma acc' clause before 'one'" } */ ; #pragma acc kernels eins /* { dg-error "expected '#pragma acc' clause before 'eins'" } */ ; #pragma acc data two /* { dg-error "expected '#pragma acc' clause before 'two'" } */ ; #pragma acc parallel #pragma acc loop deux /* { dg-error "expected '#pragma acc' 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" } */ ; }