OSDN Git Service

2006-01-20 Richard Guenther <rguenther@suse.de>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / torture / pr24626-1.c
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 }