Merge from mainline
[official-gcc.git] / gcc / testsuite / gcc.dg / pr19340.c
blob89c82f6bfe295bae3797534db4304ac07d22fca4
1 /* { dg-do compile } */
2 /* { dg-options "-O1 -fschedule-insns2 -fsched2-use-traces" } */
3 /* { dg-skip-if "No scheduling" { mmix-*-* cris-*-* m68k-*-* } { "*" } { "" } } */
5 extern double f (double x);
7 double g (int a)
9 int b, c, d, e = 0;
10 double h;
12 for (d = 0; d < a; d++)
13 for (c = 0; c < a; c++)
14 b = 1;
16 h = (double) e / (double) a;
18 if (h)
20 h = 1.0 / h;
21 h = f (h);
23 else
24 h = 1.0;
26 return h;