53 lines
551 B
C
53 lines
551 B
C
typedef union
|
|
{
|
|
struct {int a; int b;} s;
|
|
double d;
|
|
} T;
|
|
|
|
int h (T *);
|
|
T g (T);
|
|
|
|
#if COMPILER != 1
|
|
h (T *x)
|
|
{
|
|
if (x->s.a != 0 || x->s.b != 1)
|
|
abort ();
|
|
}
|
|
#endif
|
|
|
|
#if COMPILER != 2
|
|
T
|
|
g (T x)
|
|
{
|
|
if (x.s.a != 13 || x.s.b != 47)
|
|
abort ();
|
|
x.s.a = 0;
|
|
x.s.b = 1;
|
|
h (&x);
|
|
return x;
|
|
}
|
|
#endif
|
|
|
|
#if COMPILER != 1
|
|
f ()
|
|
{
|
|
T x;
|
|
x.s.a = 13;
|
|
x.s.b = 47;
|
|
g (x);
|
|
if (x.s.a != 13 || x.s.b != 47)
|
|
abort ();
|
|
x = g (x);
|
|
if (x.s.a != 0 || x.s.b != 1)
|
|
abort ();
|
|
}
|
|
#endif
|
|
|
|
#if COMPILER != 2
|
|
main ()
|
|
{
|
|
f ();
|
|
exit (0);
|
|
}
|
|
#endif
|