gcc/testsuite/gcc.dg/gomp/preprocess-1.c

   1 /* { dg-do preprocess } */
   2
   3 void foo (void)
   4 {
   5   int i1, j1, k1;
   6 #define p parallel
   7 #define P(x) private (x##1)
   8 #define S(x) shared (x##1)
   9 #define F(x) firstprivate (x##1)
  10 #pragma omp p P(i) \
  11   S(j) \
  12   F(k)
  13   ;
  14 }
  15
  16 /* { dg-final { scan-file preprocess-1.i "(^|\n)#pragma omp parallel private \\(i1\\) shared \\(j1\\) firstprivate \\(k1\\)($|\n)" } } */