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/] [execute/] [921208-1.c] - Diff between revs 149 and 154

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 149	Rev 154
`double`	`double`
`f(double x)`	`f(double x)`
`{`	`{`
`return x*x;`	`return x*x;`
`}`	`}`

`double`	`double`
`Int(double (*f)(double), double a)`	`Int(double (*f)(double), double a)`
`{`	`{`
`return (*f)(a);`	`return (*f)(a);`
`}`	`}`

`main()`	`main()`
`{`	`{`
`if (Int(&f,2.0) != 4.0)`	`if (Int(&f,2.0) != 4.0)`
`abort();`	`abort();`
`exit (0);`	`exit (0);`
`}`	`}`

powered by: WebSVN 2.1.0

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