OSDN Git Service

Fix PR 17408 and PR 17409.
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.c-torture / execute / 990127-2.c
1 void
2 fpEq (double x, double y)
3 {
4   if (x != y)
5     abort ();
6 }
7
8 void
9 fpTest (double x, double y)
10 {
11   double result1 = (35.7 * 100.0) / 45.0;
12   double result2 = (x * 100.0) / y;
13   fpEq (result1, result2);
14 }
15
16 main ()
17 {
18   fpTest (35.7, 45.0);
19   exit (0);
20 }