URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 297 |
Rev 338 |
void f(void * a, double y)
|
void f(void * a, double y)
|
{
|
{
|
}
|
}
|
|
|
double g (double a, double b, double c, double d)
|
double g (double a, double b, double c, double d)
|
{
|
{
|
double x, y, z;
|
double x, y, z;
|
void *p;
|
void *p;
|
|
|
x = a + b;
|
x = a + b;
|
y = c * d;
|
y = c * d;
|
|
|
p = alloca (16);
|
p = alloca (16);
|
|
|
f(p, y);
|
f(p, y);
|
z = x * y * a;
|
z = x * y * a;
|
|
|
return z + b;
|
return z + b;
|
}
|
}
|
|
|
main ()
|
main ()
|
{
|
{
|
double a, b, c, d;
|
double a, b, c, d;
|
a = 1.0;
|
a = 1.0;
|
b = 0.0;
|
b = 0.0;
|
c = 10.0;
|
c = 10.0;
|
d = 0.0;
|
d = 0.0;
|
|
|
if (g (a, b, c, d) != 0.0)
|
if (g (a, b, c, d) != 0.0)
|
abort ();
|
abort ();
|
|
|
if (a != 1.0 || b != 0.0 || c != 10.0 || d != 0.0)
|
if (a != 1.0 || b != 0.0 || c != 10.0 || d != 0.0)
|
abort ();
|
abort ();
|
|
|
exit (0);
|
exit (0);
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.