URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 298 |
Rev 338 |
/* { dg-require-effective-target vect_int } */
|
/* { dg-require-effective-target vect_int } */
|
/* { dg-require-effective-target vect_float } */
|
/* { dg-require-effective-target vect_float } */
|
|
|
#include <stdarg.h>
|
#include <stdarg.h>
|
#include "tree-vect.h"
|
#include "tree-vect.h"
|
|
|
#define N 64
|
#define N 64
|
|
|
int ia[N];
|
int ia[N];
|
int ib[N]=
|
int ib[N]=
|
{1,1,0,0,1,0,1,0,
|
{1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0};
|
1,1,0,0,1,0,1,0};
|
|
|
signed char ca[N];
|
signed char ca[N];
|
signed char cb[N] =
|
signed char cb[N] =
|
{1,1,0,0,1,0,1,0,
|
{1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0};
|
1,1,0,0,1,0,1,0};
|
|
|
short sa[N];
|
short sa[N];
|
short sb[N] =
|
short sb[N] =
|
{1,1,0,0,1,0,1,0,
|
{1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0};
|
1,1,0,0,1,0,1,0};
|
|
|
float fa[N];
|
float fa[N];
|
float fb[N] =
|
float fb[N] =
|
{1,1,0,0,1,0,1,0,
|
{1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0,
|
1,1,0,0,1,0,1,0};
|
1,1,0,0,1,0,1,0};
|
|
|
__attribute__ ((noinline)) int
|
__attribute__ ((noinline)) int
|
main1 ()
|
main1 ()
|
{
|
{
|
int i;
|
int i;
|
/* Check ints. */
|
/* Check ints. */
|
|
|
for (i = 0; i < N; i++)
|
for (i = 0; i < N; i++)
|
{
|
{
|
ia[i] = -ib[i];
|
ia[i] = -ib[i];
|
}
|
}
|
|
|
/* check results: */
|
/* check results: */
|
for (i = 0; i <N; i++)
|
for (i = 0; i <N; i++)
|
{
|
{
|
if (ia[i] != -ib[i])
|
if (ia[i] != -ib[i])
|
abort ();
|
abort ();
|
}
|
}
|
|
|
/* Check chars. */
|
/* Check chars. */
|
|
|
for (i = 0; i < N; i++)
|
for (i = 0; i < N; i++)
|
{
|
{
|
ca[i] = -cb[i];
|
ca[i] = -cb[i];
|
}
|
}
|
|
|
/* check results: */
|
/* check results: */
|
for (i = 0; i <N; i++)
|
for (i = 0; i <N; i++)
|
{
|
{
|
if (ca[i] != -cb[i])
|
if (ca[i] != -cb[i])
|
abort ();
|
abort ();
|
}
|
}
|
|
|
/* Check shorts. */
|
/* Check shorts. */
|
|
|
for (i = 0; i < N; i++)
|
for (i = 0; i < N; i++)
|
{
|
{
|
sa[i] = -sb[i];
|
sa[i] = -sb[i];
|
}
|
}
|
|
|
/* check results: */
|
/* check results: */
|
for (i = 0; i <N; i++)
|
for (i = 0; i <N; i++)
|
{
|
{
|
if (sa[i] != -sb[i])
|
if (sa[i] != -sb[i])
|
abort ();
|
abort ();
|
}
|
}
|
|
|
/* Check floats. */
|
/* Check floats. */
|
|
|
for (i = 0; i < N; i++)
|
for (i = 0; i < N; i++)
|
{
|
{
|
fa[i] = -fb[i];
|
fa[i] = -fb[i];
|
}
|
}
|
|
|
/* check results: */
|
/* check results: */
|
for (i = 0; i <N; i++)
|
for (i = 0; i <N; i++)
|
{
|
{
|
if (fa[i] != -fb[i])
|
if (fa[i] != -fb[i])
|
abort ();
|
abort ();
|
}
|
}
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
int main (void)
|
int main (void)
|
{
|
{
|
check_vect ();
|
check_vect ();
|
|
|
return main1 ();
|
return main1 ();
|
}
|
}
|
|
|
/* { dg-final { scan-tree-dump-times "vectorized 4 loops" 1 "vect" } } */
|
/* { dg-final { scan-tree-dump-times "vectorized 4 loops" 1 "vect" } } */
|
/* { dg-final { scan-tree-dump-times "Vectorizing an unaligned access" 0 "vect" } } */
|
/* { dg-final { scan-tree-dump-times "Vectorizing an unaligned access" 0 "vect" } } */
|
|
|
/* { dg-final { cleanup-tree-dump "vect" } } */
|
/* { dg-final { cleanup-tree-dump "vect" } } */
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.