OpenCores

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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [980821-1.c] - Diff between revs 149 and 154

Only display areas with differences | Details | Blame | View Log

Rev 149	Rev 154
`typedef int __int32_t;`	`typedef int __int32_t;`
`int __kernel_rem_pio2(int prec)`	`int __kernel_rem_pio2(int prec)`
`{`	`{`
`__int32_t i, jz;`	`__int32_t i, jz;`
`double fw, fq[20];`	`double fw, fq[20];`
`switch(prec) {`	`switch(prec) {`
`case 2:`	`case 2:`
`fw = 0.0;`	`fw = 0.0;`
`case 3:`	`case 3:`
`for (i=jz;i>0;i--) {`	`for (i=jz;i>0;i--) {`
`fw = fq[i-1] +fq[i];`	`fw = fq[i-1] +fq[i];`
`fq[i-1] = fw;`	`fq[i-1] = fw;`
`}`	`}`
`}`	`}`
`}`	`}`

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.