gcc/testsuite/gcc.dg/gomp/macro-2.c

   1 // { dg-do compile }
   2
   3 #define p       parallel
   4 #define s(x)    shared(x##1, x##2)
   5 #define d(x)    default(x)
   6
   7 void bar(int, int, int, int);
   8 void foo(void)
   9 {
  10   int a1, a2, b1, b2;
  11
  12   #pragma omp p s(a) s(b) d(none)
  13     bar(a1, a2, b1, b2);
  14 }