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 |
/* { dg-do compile } */
|
/* { dg-do compile } */
|
/* { dg-options "-ftree-vectorize" } */
|
/* { dg-options "-ftree-vectorize" } */
|
|
|
int synths_ ( float * rc)
|
int synths_ ( float * rc)
|
{
|
{
|
float r1, r2;
|
float r1, r2;
|
int i;
|
int i;
|
for (i = 0; i < 128; ++i)
|
for (i = 0; i < 128; ++i)
|
{
|
{
|
r2 = rc[i];
|
r2 = rc[i];
|
r1 = ((r2) <= (.99f) ? (r2) : (.99f));
|
r1 = ((r2) <= (.99f) ? (r2) : (.99f));
|
rc[i] = ((r1) >= (-.99f) ? (r1) : (-.99f));
|
rc[i] = ((r1) >= (-.99f) ? (r1) : (-.99f));
|
}
|
}
|
}
|
}
|
|
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.
