gcc/testsuite/gcc.dg/cpp/_Pragma5.c

   1 /* { dg-do preprocess } */
   2
   3 /* Based on Debian GNATS PR 8524.  17 Nov 2002.  */
   4
   5 #define ALPHA(A) alpha_ ## A
   6 #define BETA(B) beta_ ## B
   7 #define GAMMA(C) _Pragma("moose") ALPHA(C) BETA(C)
   8 GAMMA(baz);
   9
  10 /*
  11    { dg-final { if ![file exists _Pragma5.i] { return }                   } }
  12    { dg-final { if { [grep _Pragma5.i "alpha_baz beta_baz;"] != "" } { return }  } }
  13    { dg-final { fail "_Pragma5.c: _Pragma in macro"                       } }
  14 */