gcc/testsuite/c-c++-common/goacc/data-2.c

   1 void
   2 foo (void)
   3 {
   4   int a, b[100];
   5   int n;
   6 #pragma acc enter data copyin (a, b) async wait
   7 #pragma acc enter data create (b[20:30]) async wait
   8 #pragma acc enter data (a) /* { dg-error "expected '#pragma acc' clause before '\\\(' token" } */
   9 #pragma acc enter data create (b(1:10)) /* { dg-error "expected '\\\)' before '\\\(' token" } */
  10 #pragma acc exit data delete (a) if (0)
  11 #pragma acc exit data copyout (b) if (a)
  12 #pragma acc exit data delete (b)
  13 #pragma acc enter /* { dg-error "expected 'data' in" } */
  14 #pragma acc exit /* { dg-error "expected 'data' in" } */
  15 #pragma acc enter data /* { dg-error "has no data movement clause" } */
  16 #pragma acc exit data /* { dg-error "has no data movement clause" } */
  17 #pragma acc enter Data /* { dg-error "invalid pragma before" } */
  18 #pragma acc exit copyout (b) /* { dg-error "invalid pragma before" } */
  19 }
  20
  21 /* { dg-error "has no data movement clause" "" { target *-*-* } 8 } */