repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
2009-07-17 Richard Guenther <rguenther@suse.de>
[official-gcc.git]
/
gcc
/
testsuite
/
gcc.dg
/
torture
/
pr24626-1.c
blob
331c55ec3b0ca6348b9449420abee0c8b21cd398
1
/* { dg-do compile } */
2
3
typedef
long
4
(*
bla
)(
int
*
node
);
5
6
static long
F2
(
void
*
tree
,
long
blk
,
bla after_node_func
)
7
{
8
long
call_result
=
0
;
9
int
*
node
;
10
11
12
if
(
call_result
=
after_node_func
(
node
))
13
goto
error_free_node
;
14
15
T
(
node
);
16
return
0
;
17
18
error_free_node
:
19
T
(
node
);
20
error
:
21
return
call_result
;
22
}
23
24
long
F1
(
void
*
tree
)
25
{
26
return
F2
(
tree
,
F3
(
tree
), (
void
*)
0
);
27
}