URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Only display areas with differences |
Details |
Blame |
View Log
| Rev 273 |
Rev 519 |
/* { dg-do run } */
|
/* { dg-do run } */
|
/* { dg-options "-ftree-parallelize-loops=4 -O2 -ffast-math" } */
|
/* { dg-options "-ftree-parallelize-loops=4 -O2 -ffast-math" } */
|
|
|
extern void abort (void);
|
extern void abort (void);
|
|
|
double d[1024], e[1024];
|
double d[1024], e[1024];
|
int f[1024], g[1024];
|
int f[1024], g[1024];
|
|
|
double __attribute__((noinline))
|
double __attribute__((noinline))
|
foo (void)
|
foo (void)
|
{
|
{
|
double s = 0.0;
|
double s = 0.0;
|
int i;
|
int i;
|
for (i = 0; i < 1024; i++)
|
for (i = 0; i < 1024; i++)
|
s += d[i] - e[i];
|
s += d[i] - e[i];
|
return s;
|
return s;
|
}
|
}
|
|
|
int __attribute__((noinline))
|
int __attribute__((noinline))
|
bar (void)
|
bar (void)
|
{
|
{
|
int s = 0, i;
|
int s = 0, i;
|
for (i = 0; i < 1024; i++)
|
for (i = 0; i < 1024; i++)
|
s += f[i] - g[i];
|
s += f[i] - g[i];
|
return s;
|
return s;
|
}
|
}
|
|
|
int
|
int
|
main (void)
|
main (void)
|
{
|
{
|
int i;
|
int i;
|
for (i = 0; i < 1024; i++)
|
for (i = 0; i < 1024; i++)
|
{
|
{
|
d[i] = i * 2;
|
d[i] = i * 2;
|
e[i] = i;
|
e[i] = i;
|
f[i] = i * 2;
|
f[i] = i * 2;
|
g[i] = i;
|
g[i] = i;
|
}
|
}
|
if (foo () != 1023 * 1024 / 2)
|
if (foo () != 1023 * 1024 / 2)
|
abort ();
|
abort ();
|
if (bar () != 1023 * 1024 / 2)
|
if (bar () != 1023 * 1024 / 2)
|
abort ();
|
abort ();
|
return 0;
|
return 0;
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.