Fortran: Fix PR 47485.
[gcc.git] / gcc / testsuite / g++.dg / other / pr89560.C
blobdeb983969d75a1fdac95ce30fbeb6224ecbc7208
1 // PR bootstrap/89560
2 // { dg-do compile }
4 #define TEN(x) x##0, x##1, x##2, x##3, x##4, x##5, x##6, x##7, x##8, x##9,
5 #define HUNDRED(x) TEN(x##0) TEN(x##1) TEN(x##2) TEN(x##3) TEN(x##4) \
6                    TEN(x##5) TEN(x##6) TEN(x##7) TEN(x##8) TEN(x##9)
7 int foo (int, ...);
9 int
10 bar ()
12   return (foo (HUNDRED (1) 0));