mirror of
git://gcc.gnu.org/git/gcc.git
synced 2024-12-30 11:34:56 +08:00
New testcase for x86 XFmode problems.
From-SVN: r18051
This commit is contained in:
parent
979c1a1757
commit
d84a12e2de
27
gcc/testsuite/gcc.dg/980211-1.c
Normal file
27
gcc/testsuite/gcc.dg/980211-1.c
Normal file
@ -0,0 +1,27 @@
|
||||
/* Test long double on x86. */
|
||||
|
||||
/* { dg-do run { target i?86-*-* } } */
|
||||
/* { dg-options -O2 } */
|
||||
|
||||
__inline int
|
||||
__signbitl (long double __x)
|
||||
{
|
||||
union { long double __l; int __i[3]; } __u = { __l: __x };
|
||||
|
||||
return (__u.__i[2] & 0x8000) != 0;
|
||||
}
|
||||
|
||||
void
|
||||
foo (long double x, long double y)
|
||||
{
|
||||
long double z = x / y;
|
||||
if (__signbitl (x) && __signbitl (z))
|
||||
abort ();
|
||||
}
|
||||
|
||||
int main()
|
||||
{
|
||||
if (sizeof (long double) > sizeof (double))
|
||||
foo (-0.0, -1.0);
|
||||
return 0;
|
||||
}
|
Loading…
Reference in New Issue
Block a user