gcc/testsuite/c-c++-common/gomp/default-3.c

   1 void
   2 foo (void)
   3 {
   4   int i;
   5   #pragma omp task default(copyprivate) /* { dg-error "expected 'none', 'shared', 'private' or 'firstprivate' before 'copyprivate'" } */
   6   ;
   7   #pragma omp taskloop default(copyprivate)     /* { dg-error "expected 'none', 'shared', 'private' or 'firstprivate' before 'copyprivate'" } */
   8   for (i = 0; i < 64; i++)
   9     ;
  10   #pragma omp teams default(copyprivate)        /* { dg-error "expected 'none', 'shared', 'private' or 'firstprivate' before 'copyprivate'" } */
  11   ;
  12   #pragma omp parallel default(copyprivate)     /* { dg-error "expected 'none', 'shared', 'private' or 'firstprivate' before 'copyprivate'" } */
  13   ;
  14 }