1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
/* n_26.c: The name once replaced is not furthur replaced. */
/* 26.1: Directly recursive object-like macro definition. */
/* Z(0); */
#define Z Z(0)
Z;
/* 26.2: Intermediately recursive object-like macro definition. */
/* AB; */
#define AB BA
#define BA AB
AB;
/* 26.3: Directly recursive function-like macro definition. */
/* x + f(x); */
#define f(a) a + f(a)
f( x);
/* 26.4: Intermediately recursive function-like macro definition. */
/* x + x + g( x); */
#define g(a) a + h( a)
#define h(a) a + g( a)
g( x);
/* 26.5: Rescanning encounters the non-replaced macro name. */
/* Z(0) + f( Z(0)); */
f( Z);
/* { dg-do preprocess }
{ dg-final { if ![file exist n_26.i] { return } } }
{ dg-final { if \{ [grep n_26.i "Z\\(0\\)"] != "" \} \{ } }
{ dg-final { if \{ [grep n_26.i "AB"] != "" \} \{ } }
{ dg-final { if \{ [grep n_26.i "x *\\+ f\\( *x *\\)"] != "" \} \{ } }
{ dg-final { if \{ [grep n_26.i "x *\\+ *x *\\+ *g\\( *x *\\)"] != "" \} \{ } }
{ dg-final { if \{ [grep n_26.i "Z\\(0\\) *\\+ f\\( *Z\\(0\\) *\\)"] != "" \} \{ } }
{ dg-final { return \} \} \} \} \} } }
{ dg-final { fail "n_26.c: recursive macro" } }
*/
|
