URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Go to most recent revision |
Only display areas with differences |
Details |
Blame |
View Log
Rev 318 |
Rev 338 |
/* Execution test for argument passing with SSE and local functions
|
/* Execution test for argument passing with SSE and local functions
|
Written by Paolo Bonzini, 25 January 2005 */
|
Written by Paolo Bonzini, 25 January 2005 */
|
|
|
/* { dg-do run } */
|
/* { dg-do run } */
|
/* { dg-options "-O2 -msse -mfpmath=sse" } */
|
/* { dg-options "-O2 -msse -mfpmath=sse" } */
|
/* { dg-require-effective-target sse } */
|
/* { dg-require-effective-target sse } */
|
|
|
#include "sse-check.h"
|
#include "sse-check.h"
|
|
|
#include <assert.h>
|
#include <assert.h>
|
|
|
static float xs (void)
|
static float xs (void)
|
{
|
{
|
return 3.14159265;
|
return 3.14159265;
|
}
|
}
|
|
|
float ys (float a)
|
float ys (float a)
|
{
|
{
|
return xs () * a;
|
return xs () * a;
|
}
|
}
|
|
|
static double xd (void)
|
static double xd (void)
|
{
|
{
|
return 3.1415926535;
|
return 3.1415926535;
|
}
|
}
|
|
|
double yd (double a)
|
double yd (double a)
|
{
|
{
|
return xd () * a;
|
return xd () * a;
|
}
|
}
|
|
|
static void
|
static void
|
sse_test (void)
|
sse_test (void)
|
{
|
{
|
assert (ys (1) == xs ());
|
assert (ys (1) == xs ());
|
assert (ys (2) == xs () * 2);
|
assert (ys (2) == xs () * 2);
|
assert (yd (1) == xd ());
|
assert (yd (1) == xd ());
|
assert (yd (2) == xd () * 2);
|
assert (yd (2) == xd () * 2);
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.