Mercurial > hg > CbC > CbC_gcc

annotate gcc/testsuite/gcc.c-torture/compat/struct-ret-1.c @ 158:494b0b89df80 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 04ced10e8804
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 typedef struct { int re; int im; } T;
kono
parents:
diff changeset
2
kono
parents:
diff changeset
3 T f (int, int);
kono
parents:
diff changeset
4
kono
parents:
diff changeset
5 #if COMPILER != 1
kono
parents:
diff changeset
6 T
kono
parents:
diff changeset
7 f (int arg1, int arg2)
kono
parents:
diff changeset
8 {
kono
parents:
diff changeset
9 T x;
kono
parents:
diff changeset
10 x.re = arg1;
kono
parents:
diff changeset
11 x.im = arg2;
kono
parents:
diff changeset
12 return x;
kono
parents:
diff changeset
13 }
kono
parents:
diff changeset
14 #endif
kono
parents:
diff changeset
15
kono
parents:
diff changeset
16 #if COMPILER != 2
kono
parents:
diff changeset
17 main ()
kono
parents:
diff changeset
18 {
kono
parents:
diff changeset
19 T result;
kono
parents:
diff changeset
20 result = f (3, 4);
kono
parents:
diff changeset
21 if (result.re != 3 || result.im != 4)
kono
parents:
diff changeset
22 abort ();
kono
parents:
diff changeset
23 exit (0);
kono
parents:
diff changeset
24 }
kono
parents:
diff changeset
25 #endif