2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git] / gcc / testsuite / gcc.c-torture / execute / 920501-7.c
blobc23717d797e00589c0aeea9e54ecdae923f8062f
1 #ifdef STACK_SIZE
2 #define DEPTH ((STACK_SIZE) / 512 + 1)
3 #else
4 #define DEPTH 1000
5 #endif
7 #if ! defined (NO_LABEL_VALUES) && !defined (NO_TRAMPOLINES)
8 x(a)
10 __label__ xlab;
11 void y(a)
13 if (a==0)
14 goto xlab;
15 y (a-1);
17 y (a);
18 xlab:;
19 return a;
21 #endif
23 main ()
25 #if ! defined (NO_LABEL_VALUES) && !defined (NO_TRAMPOLINES)
26 if (x (DEPTH) != DEPTH)
27 abort ();
28 #endif
29 exit (0);