tcl global directive outside proc body does nothing (ld)
[deliverable/binutils-gdb.git] / ld / testsuite / ld-plugin / pr12365a.c
1 extern void abort(void);
2 extern void main_test (void);
3 extern void abort (void);
4 int inside_main;
5
6 int
7 main ()
8 {
9 inside_main = 1;
10 main_test ();
11 inside_main = 0;
12 return 0;
13 }
14
15 /* When optimizing, all the constant cases should have been
16 constant folded, so no calls to link_error should remain.
17 In any case, link_error should not be called. */
18
19 #ifndef __OPTIMIZE__
20 void
21 link_error (void)
22 {
23 abort ();
24 }
25 #endif
This page took 0.029272 seconds and 4 git commands to generate.