2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git] / gcc / testsuite / gcc.c-torture / execute / 920411-1.c
blobe3e981001088b38ff566098311b5f930e172ff8f
1 long f (w)
2 char *w;
4 long k, i, c = 0, x;
5 char *p = (char*) &x;
6 for (i = 0; i < 1; i++)
8 for (k = 0; k < sizeof (long); k++)
9 p[k] = w[k];
10 c += x;
12 return c;
15 main ()
17 int i;
18 char a[sizeof (long)];
20 for (i = sizeof (long); --i >= 0;) a[i] = ' ';
21 if (f (a) != ~0UL / (unsigned char) ~0 * ' ')
22 abort ();
23 exit (0);