annotate gcc/testsuite/gcc.dg/cpp/strp1.c @ 131:84e7813d76e9

gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents 04ced10e8804
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* { dg-do run } */
kono
parents:
diff changeset
2
kono
parents:
diff changeset
3 /* Regression test for stringizing and token pasting.
kono
parents:
diff changeset
4 We got internal escape markers in the strings. */
kono
parents:
diff changeset
5
kono
parents:
diff changeset
6 #include <string.h>
kono
parents:
diff changeset
7 #include <stdlib.h>
kono
parents:
diff changeset
8
kono
parents:
diff changeset
9 #define S(x) _S(x)
kono
parents:
diff changeset
10 #define _S(x) #x
kono
parents:
diff changeset
11
kono
parents:
diff changeset
12 #define I 1
kono
parents:
diff changeset
13 static const char s1[] = S(I.1);
kono
parents:
diff changeset
14 static const char t1[] = "1.1";
kono
parents:
diff changeset
15
kono
parents:
diff changeset
16 #define f h
kono
parents:
diff changeset
17 #define h(a) a+f
kono
parents:
diff changeset
18 static const char s2[] = S( f(1)(2) );
kono
parents:
diff changeset
19 static const char t2[] = "1+h(2)";
kono
parents:
diff changeset
20
kono
parents:
diff changeset
21 #undef I
kono
parents:
diff changeset
22 #undef f
kono
parents:
diff changeset
23 #undef h
kono
parents:
diff changeset
24
kono
parents:
diff changeset
25 int
kono
parents:
diff changeset
26 main(void)
kono
parents:
diff changeset
27 {
kono
parents:
diff changeset
28 if (strcmp (s1, t1))
kono
parents:
diff changeset
29 abort ();
kono
parents:
diff changeset
30
kono
parents:
diff changeset
31 if (strcmp (s2, t2))
kono
parents:
diff changeset
32 abort ();
kono
parents:
diff changeset
33
kono
parents:
diff changeset
34 return 0;
kono
parents:
diff changeset
35 }