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)" } } */