OpenCores

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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.dg/] [20010405-1.c] - Diff between revs 298 and 338

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

Rev 298	Rev 338
`__inline__ double bar(double *x)`	`__inline__ double bar(double *x)`
`{`	`{`
`static double a;`	`static double a;`
`a = x >= 0 ? x : -*x;`	`a = x >= 0 ? x : -*x;`
`return a;`	`return a;`
`}`	`}`

`int main(void)`	`int main(void)`
`{`	`{`
`extern double bar();`	`extern double bar();`
`double a;`	`double a;`
`static double b;`	`static double b;`
`int r;`	`int r;`
`for (r = 1; r < 3; r++) {`	`for (r = 1; r < 3; r++) {`
`a = 1.0;`	`a = 1.0;`
`b = bar(&a);`	`b = bar(&a);`
`}`	`}`
`return 0;`	`return 0;`
`}`	`}`

powered by: WebSVN 2.1.0

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