Mercurial > hg > CbC > CbC_gcc

annotate gcc/testsuite/c-c++-common/Wmultistatement-macros-9.c @ 111:04ced10e8804

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* PR c/80116 */
kono
parents:
diff changeset
2 /* { dg-options "-Wmultistatement-macros" } */
kono
parents:
diff changeset
3 /* { dg-do compile } */
kono
parents:
diff changeset
4
kono
parents:
diff changeset
5 #define SWAP(x, y) \
kono
parents:
diff changeset
6 tmp = x; /* { dg-warning "macro expands to multiple statements" } */ \
kono
parents:
diff changeset
7 x = y; \
kono
parents:
diff changeset
8 y = tmp
kono
parents:
diff changeset
9
kono
parents:
diff changeset
10 #define M1 \
kono
parents:
diff changeset
11 while (x) /* { dg-message "not guarded by this 'while' claus" } */ \
kono
parents:
diff changeset
12 SWAP (x, y) /* { dg-message "in expansion of macro .SWAP." } */
kono
parents:
diff changeset
13
kono
parents:
diff changeset
14 #define M2 \
kono
parents:
diff changeset
15 while (x) \
kono
parents:
diff changeset
16 x++
kono
parents:
diff changeset
17
kono
parents:
diff changeset
18 #define M3 \
kono
parents:
diff changeset
19 while (x) \
kono
parents:
diff changeset
20 x++;;
kono
parents:
diff changeset
21
kono
parents:
diff changeset
22 #define M4 \
kono
parents:
diff changeset
23 while (x) /* { dg-message "not guarded by this 'while' claus" } */ \
kono
parents:
diff changeset
24 L1: \
kono
parents:
diff changeset
25 SWAP (x, y) /* { dg-message "in expansion of macro .SWAP." } */
kono
parents:
diff changeset
26
kono
parents:
diff changeset
27 #define INC \
kono
parents:
diff changeset
28 x++;;
kono
parents:
diff changeset
29
kono
parents:
diff changeset
30 int x, y, tmp;
kono
parents:
diff changeset
31
kono
parents:
diff changeset
32 void
kono
parents:
diff changeset
33 fn0 (void)
kono
parents:
diff changeset
34 {
kono
parents:
diff changeset
35 while (x) /* { dg-message "not guarded by this 'while' claus" } */
kono
parents:
diff changeset
36 SWAP (x, y); /* { dg-message "in expansion of macro .SWAP." } */
kono
parents:
diff changeset
37
kono
parents:
diff changeset
38 while (x) /* { dg-message "not guarded by this 'while' claus" } */
kono
parents:
diff changeset
39 L:
kono
parents:
diff changeset
40 SWAP (x, y); /* { dg-message "in expansion of macro .SWAP." } */
kono
parents:
diff changeset
41 goto L;
kono
parents:
diff changeset
42 }
kono
parents:
diff changeset
43
kono
parents:
diff changeset
44 void
kono
parents:
diff changeset
45 fn1 (void)
kono
parents:
diff changeset
46 {
kono
parents:
diff changeset
47 M1; /* { dg-message "in expansion of macro .M1." } */
kono
parents:
diff changeset
48 M2;
kono
parents:
diff changeset
49 M3;
kono
parents:
diff changeset
50 M4; /* { dg-message "in expansion of macro .M4." } */
kono
parents:
diff changeset
51 goto L1;
kono
parents:
diff changeset
52 }
kono
parents:
diff changeset
53
kono
parents:
diff changeset
54 void
kono
parents:
diff changeset
55 fn2 (void)
kono
parents:
diff changeset
56 {
kono
parents:
diff changeset
57 while (x)
kono
parents:
diff changeset
58 INC
kono
parents:
diff changeset
59
kono
parents:
diff changeset
60 while (x)
kono
parents:
diff changeset
61 ({ x = 10; x++; });
kono
parents:
diff changeset
62 }