OSDN Git Service

Backported from mainline
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.c-torture / execute / nestfunc-1.c
1 int
2 g (int a, int b, int (*gi) (int, int))
3 {
4   if ((*gi) (a, b))
5     return a;
6   else
7     return b;
8 }
9
10 f ()
11 {
12 #ifndef NO_TRAMPOLINES
13   int i, j;
14   int f2 (int a, int b)
15     {
16       return a > b;
17     }
18
19   if (g (1, 2, f2) != 2)
20     abort ();
21 #endif
22 }
23
24 main ()
25 {
26   f ();
27   exit (0);
28 }