gcc/testsuite/c-c++-common/gomp/begin-declare-target-2.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-fopenmp" } */
   3
   4 extern int a;
   5 #pragma omp begin declare target
   6 #pragma omp declare target to (a)
   7 #pragma omp end declare target
   8 int b;
   9 #pragma omp begin declare target to (b)         /* { dg-error "'to' is not valid for '#pragma omp begin declare target'" } */
  10 #pragma omp end declare target
  11 int c;
  12 #pragma omp begin declare target link (c)       /* { dg-error "'link' is not valid for '#pragma omp begin declare target'" } */
  13 #pragma omp end declare target
  14 int m;
  15 #pragma omp begin declare target device_type (host) device_type (any)   /* { dg-error "too many 'device_type' clauses" } */
  16 #pragma omp end declare target
  17 #pragma omp begin declare target
  18 #pragma omp end declare target to (p)           /* { dg-error "expected end of line before .to." } */