gcc/testsuite/g++.dg/gomp/clause-4.C

   1 // PR c/34506
   2 // { dg-do compile }
   3
   4 #define p parallel
   5
   6 void
   7 foo (int x)
   8 {
   9 #pragma omp p num_threads (4) if (1) private (x)
  10     ;
  11 #pragma omp p num_threads(4)if(1)private(x)
  12     ;
  13 #pragma omp p num_threads (4), if (1) , private (x)
  14     ;
  15 #pragma omp p num_threads(4),if(1),private(x)
  16     ;
  17 #pragma omp p, num_threads (4), if (1), private (x)     // { dg-error "clause before" }
  18     ;
  19 #pragma omp p num_threads (4), if (1), private (x),     // { dg-error "clause before" }
  20     ;
  21 #pragma omp p num_threads (4), , if (1), private (x)    // { dg-error "clause before" }
  22     ;
  23 }