URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 318 |
Rev 338 |
/* Test that we don't generate a fisttp instruction when -mno-sse3. */
|
/* Test that we don't generate a fisttp instruction when -mno-sse3. */
|
/* { dg-do compile } */
|
/* { dg-do compile } */
|
/* { dg-options "-O -mfpmath=387 -march=nocona -mno-sse3" } */
|
/* { dg-options "-O -mfpmath=387 -march=nocona -mno-sse3" } */
|
/* { dg-final { scan-assembler-not "fisttp" } } */
|
/* { dg-final { scan-assembler-not "fisttp" } } */
|
struct foo
|
struct foo
|
{
|
{
|
long a;
|
long a;
|
long b;
|
long b;
|
};
|
};
|
|
|
extern double c;
|
extern double c;
|
|
|
extern unsigned long long baz (void);
|
extern unsigned long long baz (void);
|
|
|
int
|
int
|
walrus (const struct foo *input)
|
walrus (const struct foo *input)
|
{
|
{
|
unsigned long long d;
|
unsigned long long d;
|
|
|
d = baz ()
|
d = baz ()
|
+ (unsigned long long) (((double) input->a * 1000000000
|
+ (unsigned long long) (((double) input->a * 1000000000
|
+ (double) input->b) * c);
|
+ (double) input->b) * c);
|
return (d ? 1 : 0);
|
return (d ? 1 : 0);
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.