1struct complex
2{
3  float r;
4  float i;
5};
6
7struct complex cmplx (float, float);
8
9struct complex
10f (float a, float b)
11{
12  struct complex c;
13  c.r = a;
14  c.i = b;
15  return c;
16}
17
18main ()
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}
26