OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Fix typo in previous commit.
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gcc.c-torture
/
execute
/
nestfunc-5.c
1
extern void abort (void);
2
extern void exit (int);
3
4
#ifndef NO_TRAMPOLINES
5
static void recursive (int n, void (*proc) (void))
6
{
7
__label__ l1;
8
9
void do_goto (void)
10
{
11
goto l1;
12
}
13
14
if (n == 3)
15
recursive (n - 1, do_goto);
16
else if (n > 0)
17
recursive (n - 1, proc);
18
else
19
(*proc) ();
20
return;
21
22
l1:
23
if (n == 3)
24
exit (0);
25
else
26
abort ();
27
}
28
29
int main ()
30
{
31
recursive (10, abort);
32
abort ();
33
}
34
#else
35
int main () { return 0; }
36
#endif