Mercurial > hg > CbC > CbC_gcc

annotate gcc/testsuite/gcc.c-torture/compile/r1.c @ 131:84e7813d76e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 void assert (a) {if (a != 1) abort ();}
kono
parents:
diff changeset
2
kono
parents:
diff changeset
3 int h1 (int *p) {return *p & 255;}
kono
parents:
diff changeset
4
kono
parents:
diff changeset
5 void p1 () {int a = 0x01020304; assert (h1 (&a) == 0x04);}
kono
parents:
diff changeset
6
kono
parents:
diff changeset
7
kono
parents:
diff changeset
8 int h2 (a) {return a > 0;}
kono
parents:
diff changeset
9
kono
parents:
diff changeset
10 p2 () {assert (h2 (1));}
kono
parents:
diff changeset
11
kono
parents:
diff changeset
12 h3 (int *p)
kono
parents:
diff changeset
13 {
kono
parents:
diff changeset
14 *p |= 255;
kono
parents:
diff changeset
15 }
kono
parents:
diff changeset
16
kono
parents:
diff changeset
17 p3 ()
kono
parents:
diff changeset
18 {
kono
parents:
diff changeset
19 int *p;
kono
parents:
diff changeset
20 h3 (p);
kono
parents:
diff changeset
21 }
kono
parents:
diff changeset
22
kono
parents:
diff changeset
23 main ()
kono
parents:
diff changeset
24 {
kono
parents:
diff changeset
25 p1 ();
kono
parents:
diff changeset
26 p2 ();
kono
parents:
diff changeset
27 p3 ();
kono
parents:
diff changeset
28 puts ("Compiler test passed.");
kono
parents:
diff changeset
29 }