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)
8GAMMA(baz);
9
10/* { dg-final { scan-file "_Pragma5.i" "alpha_baz beta_baz;" } } */
11