URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Go to most recent revision |
Only display areas with differences |
Details |
Blame |
View Log
Rev 149 |
Rev 154 |
#include <stdarg.h>
|
#include <stdarg.h>
|
|
|
void vafunction (char *dummy, ...)
|
void vafunction (char *dummy, ...)
|
{
|
{
|
double darg;
|
double darg;
|
int iarg;
|
int iarg;
|
int flag = 0;
|
int flag = 0;
|
int i;
|
int i;
|
va_list ap;
|
va_list ap;
|
|
|
va_start(ap, dummy);
|
va_start(ap, dummy);
|
for (i = 1; i <= 18; i++, flag++)
|
for (i = 1; i <= 18; i++, flag++)
|
{
|
{
|
if (flag & 1)
|
if (flag & 1)
|
{
|
{
|
darg = va_arg (ap, double);
|
darg = va_arg (ap, double);
|
if (darg != (double)i)
|
if (darg != (double)i)
|
abort();
|
abort();
|
}
|
}
|
else
|
else
|
{
|
{
|
iarg = va_arg (ap, int);
|
iarg = va_arg (ap, int);
|
if (iarg != i)
|
if (iarg != i)
|
abort();
|
abort();
|
}
|
}
|
}
|
}
|
va_end(ap);
|
va_end(ap);
|
}
|
}
|
|
|
int main (void)
|
int main (void)
|
{
|
{
|
vafunction( "",
|
vafunction( "",
|
1, 2.,
|
1, 2.,
|
3, 4.,
|
3, 4.,
|
5, 6.,
|
5, 6.,
|
7, 8.,
|
7, 8.,
|
9, 10.,
|
9, 10.,
|
11, 12.,
|
11, 12.,
|
13, 14.,
|
13, 14.,
|
15, 16.,
|
15, 16.,
|
17, 18. );
|
17, 18. );
|
exit(0);
|
exit(0);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.