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

   1 double
   2 foo (void)
   3 {
   4   return 0.0;
   5 }
   6
   7 void
   8 do_sibcall (void)
   9 {
  10   (void) foo ();
  11 }
  12
  13 int
  14 main (void)
  15 {
  16    double x;
  17
  18    for (x = 0; x < 20; x++)
  19       do_sibcall ();
  20    if (!(x >= 10))
  21       abort ();
  22    exit (0);
  23 }
  24