blob: 371672cab759051465c9cd1b7e7dd085ea4d5bf5 [file] [log] [blame]
/* { dg-do run { target sparc*-*-* } } */
/* { dg-options "-O2 -mcpu=ultrasparc -mvis" } */
extern void abort (void);
extern void exit (int);
int l;
int baz (double x)
{
return l == 0;
}
double bar (double x)
{
return 1.0;
}
double foo (double x)
{
if (l == -1 || baz (x)) return x;
if (x < 0.0)
return bar (x);
else
return 0.0;
}
union {
double d;
long long l;
} x = { l: 0x7ff8000000000000LL }, y;
main ()
{
unsigned int fsr = 0;
__asm __volatile ("ld %0, %%fsr" : : "m" (fsr));
y.d = foo (x.d);
__asm __volatile ("st %%fsr, %0" : "=m" (fsr));
if (x.l != y.l || (fsr & 0x3ff))
abort ();
exit (0);
}