URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [pr21921.c] - Diff between revs 154 and 816

Rev 154	Rev 816
`/* { dg-do compile } */`	`/* { dg-do compile } */`
`/* { dg-options "-O1 -funsafe-math-optimizations" } */`	`/* { dg-options "-O1 -funsafe-math-optimizations" } */`

`void`	`void`
`Q (double *s, double h)`	`Q (double *s, double h)`
`{`	`{`
`int i;`	`int i;`
`if (h > 1)`	`if (h > 1)`
`h = h - 1;`	`h = h - 1;`

`for (i = 1; i < 3; i++)`	`for (i = 1; i < 3; i++)`
`if (s[i] / h > 0)`	`if (s[i] / h > 0)`
`s[0] = h, s[i] = s[i] / h;`	`s[0] = h, s[i] = s[i] / h;`
`}`	`}`