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

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

Rev 149	Rev 154
`#include <stdarg.h>`	`#include <stdarg.h>`

`void fdouble (double one, ...)`	`void fdouble (double one, ...)`
`{`	`{`
`double value;`	`double value;`
`va_list ap;`	`va_list ap;`

`va_start (ap, one);`	`va_start (ap, one);`
`value = va_arg (ap, double);`	`value = va_arg (ap, double);`
`va_end (ap);`	`va_end (ap);`

`if (one != 1.0 \|\| value != 2.0)`	`if (one != 1.0 \|\| value != 2.0)`
`abort ();`	`abort ();`
`}`	`}`

`int main ()`	`int main ()`
`{`	`{`
`fdouble (1.0, 2.0);`	`fdouble (1.0, 2.0);`
`exit (0);`	`exit (0);`
`}`	`}`

powered by: WebSVN 2.1.0

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