gnu/dist/gcc4/gcc/testsuite/gcc.c-torture/execute/960512-1.c

   1 __complex__
   2 double f ()
   3 {
   4   int a[40];
   5   __complex__ double c;
   6
   7   a[9] = 0;
   8   c = a[9];
   9   return c;
  10 }
  11
  12 main ()
  13 {
  14   __complex__ double c;
  15
  16   if (c = f ())
  17     abort ();
  18   exit (0);
  19 }