1 /*
2    20030401-1.c from the execute part of the gcc torture tests.
3  */
4 
5 #include <testfwk.h>
6 
7 #ifdef __SDCC
8 #pragma std_c99
9 #endif
10 
11 /* Testcase for PR fortran/9974.  This was a miscompilation of the g77
12    front-end caused by the jump bypassing optimizations not handling
13    instructions inserted on CFG edges.  */
14 
bar()15 int bar ()
16 {
17   return 1;
18 }
19 
foo(int x)20 void foo (int x)
21 {
22   unsigned char error = 0;
23 
24   if (! (error = ((x == 0) || bar ())))
25     bar ();
26   if (! error)
27     ASSERT (0);
28 }
29 
30 void
testTortureExecute(void)31 testTortureExecute (void)
32 {
33   foo (1);
34   return;
35 }
36 
37