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/] [va-arg-14.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
`#include <stdarg.h>`	`#include <stdarg.h>`

`va_list global;`	`va_list global;`

`void vat(va_list param, ...)`	`void vat(va_list param, ...)`
`{`	`{`
`va_list local;`	`va_list local;`

`va_start (local, param);`	`va_start (local, param);`
`va_copy (global, local);`	`va_copy (global, local);`
`va_copy (param, local);`	`va_copy (param, local);`
`if (va_arg (local, int) != 1)`	`if (va_arg (local, int) != 1)`
`abort();`	`abort();`
`va_end (local);`	`va_end (local);`
`if (va_arg (global, int) != 1)`	`if (va_arg (global, int) != 1)`
`abort();`	`abort();`
`va_end (global);`	`va_end (global);`
`if (va_arg (param, int) != 1)`	`if (va_arg (param, int) != 1)`
`abort();`	`abort();`
`va_end (param);`	`va_end (param);`

`va_start (param, param);`	`va_start (param, param);`
`va_start (global, param);`	`va_start (global, param);`
`va_copy (local, param);`	`va_copy (local, param);`
`if (va_arg (local, int) != 1)`	`if (va_arg (local, int) != 1)`
`abort();`	`abort();`
`va_end (local);`	`va_end (local);`
`va_copy (local, global);`	`va_copy (local, global);`
`if (va_arg (local, int) != 1)`	`if (va_arg (local, int) != 1)`
`abort();`	`abort();`
`va_end (local);`	`va_end (local);`
`if (va_arg (global, int) != 1)`	`if (va_arg (global, int) != 1)`
`abort();`	`abort();`
`va_end (global);`	`va_end (global);`
`if (va_arg (param, int) != 1)`	`if (va_arg (param, int) != 1)`
`abort();`	`abort();`
`va_end (param);`	`va_end (param);`
`}`	`}`

`int main(void)`	`int main(void)`
`{`	`{`
`va_list t;`	`va_list t;`
`vat (t, 1);`	`vat (t, 1);`
`exit (0);`	`exit (0);`
`}`	`}`

powered by: WebSVN 2.1.0

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