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

   1 /* { dg-additional-options "-fpermissive" } */
   2
   3 static double one = 1.0;
   4
   5 f()
   6 {
   7   int colinear;
   8   colinear = (one == 0.0);
   9   if (colinear)
  10     abort ();
  11   return colinear;
  12 }
  13 main()
  14 {
  15   if (f()) abort();
  16   exit (0);
  17 }