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


1
2
3
4
5
6
7
8
9
10
11
12
13
14

// { dg-do compile }

#define p	parallel
#define s(x)	shared(x##1, x##2)
#define d(x)	default(x)

void bar(int, int, int, int);
void foo(void)
{
  int a1, a2, b1, b2;

  #pragma omp p s(a) s(b) d(none)
    bar(a1, a2, b1, b2);
}