URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [libgloss/] [testsuite/] [libgloss.all/] [varargs2.c] - Rev 217
Go to most recent revision | Compare with Previous | Blame | View Log
/* Oki bug report [OKI013] Variable argments test failed. Execution result. val1, val2 = 1, 0 val1, val2 = 2, 0 val1, val2 = 3, 0 Note, this test case for for traditional style C code. */ #include <stdio.h> #include <varargs.h> int func(); main() { func(1., 2., 3.); } func(va_alist) va_dcl { va_list p; double val1, val2; int j; va_start(p); for (j = 1; j <= 3; ++j){ dequals((double)j, va_arg(p, double)); } va_end(p); return (p); } dequals(double val1, double val2) { iprintf ("val1 is %d, val2 is %d\n", (int)val1, (int)val2); if (val1 == val2) pass ("varargs2 [OKI013]"); else fail ("varargs2 [OKI013]"); fflush (stdout); return; }
Go to most recent revision | Compare with Previous | Blame | View Log