OSDN Git Service

ChangeLog:
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / pr21921.c
1 /* { dg-do compile } */
2 /* { dg-options "-O1 -funsafe-math-optimizations" } */
3
4 void
5 Q (double *s, double h)
6 {
7   int i;
8   if (h > 1)
9     h = h - 1;
10
11   for (i = 1; i < 3; i++)
12     if (s[i] / h > 0)
13       s[0] = h, s[i] = s[i] / h;
14 }