URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 318 |
Rev 338 |
/* { dg-do compile } */
|
/* { dg-do compile } */
|
/* { dg-options "-O2 -ffast-math -ftree-vectorize -msse -mfpmath=sse -mrecip" } */
|
/* { dg-options "-O2 -ffast-math -ftree-vectorize -msse -mfpmath=sse -mrecip" } */
|
/* { dg-require-effective-target sse } */
|
/* { dg-require-effective-target sse } */
|
|
|
float a[16];
|
float a[16];
|
float b[16];
|
float b[16];
|
float r[16];
|
float r[16];
|
|
|
extern float sqrtf (float);
|
extern float sqrtf (float);
|
|
|
void t1(void)
|
void t1(void)
|
{
|
{
|
int i;
|
int i;
|
|
|
for (i = 0; i < 16; i++)
|
for (i = 0; i < 16; i++)
|
r[i] = a[i] / sqrtf (b[i]);
|
r[i] = a[i] / sqrtf (b[i]);
|
}
|
}
|
|
|
void t2(void)
|
void t2(void)
|
{
|
{
|
int i;
|
int i;
|
|
|
for (i = 0; i < 16; i++)
|
for (i = 0; i < 16; i++)
|
r[i] = sqrtf (a[i] / b[i]);
|
r[i] = sqrtf (a[i] / b[i]);
|
}
|
}
|
|
|
void t3(void)
|
void t3(void)
|
{
|
{
|
int i;
|
int i;
|
|
|
for (i = 0; i < 16; i++)
|
for (i = 0; i < 16; i++)
|
r[i] = sqrtf (a[i]);
|
r[i] = sqrtf (a[i]);
|
}
|
}
|
|
|
/* { dg-final { scan-assembler-times "rsqrtps" 3 } } */
|
/* { dg-final { scan-assembler-times "rsqrtps" 3 } } */
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.