gcc/testsuite/gcc.c-torture/execute/920411-1.c

   1 /* { dg-additional-options "-std=gnu89" } */
   2
   3 long f (w)
   4      char *w;
   5 {
   6   long k, i, c = 0, x;
   7   char *p = (char*) &x;
   8   for (i = 0; i < 1; i++)
   9     {
  10       for (k = 0; k < sizeof (long); k++)
  11         p[k] = w[k];
  12       c += x;
  13     }
  14   return c;
  15 }
  16
  17 main ()
  18 {
  19   int i;
  20   char a[sizeof (long)];
  21
  22   for (i = sizeof (long); --i >= 0;) a[i] = ' ';
  23   if (f (a) != ~0UL / (unsigned char) ~0 * ' ')
  24     abort ();
  25   exit (0);
  26 }