OSDN Git Service

Merge lto branch into trunk.
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.c-torture / execute / complex-3.c
1 struct complex
2 {
3   float r;
4   float i;
5 };
6
7 struct complex cmplx (float, float);
8
9 struct complex
10 f (float a, float b)
11 {
12   struct complex c;
13   c.r = a;
14   c.i = b;
15   return c;
16 }
17
18 main ()
19 {
20   struct complex z = f (1.0, 0.0);
21
22   if (z.r != 1.0 || z.i != 0.0)
23     abort ();
24   exit (0);
25 }