OSDN Git Service

2009-03-29 Richard Guenther <rguenther@suse.de>
[pf3gnuchains/gcc-fork.git] / 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