Viewing file:  pr102498.c (1.08 KB) -rw-r--r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
/* PR target/102498 */
/* { dg-do run { target fenv } } */
/* { dg-options "-frounding-math" } */
#include <fenv.h>
#include <stdlib.h>
__attribute__((noipa)) long double
fldlg2 (void)
{
return 0.3010299956639811952256464283594894482L;
}
__attribute__((noipa)) long double
fldln2 (void)
{
return 0.6931471805599453094286904741849753009L;
}
__attribute__((noipa)) long double
fldl2e (void)
{
return 1.4426950408889634073876517827983434472L;
}
__attribute__((noipa)) long double
fldl2t (void)
{
return 3.3219280948873623478083405569094566090L;
}
__attribute__((noipa)) long double
fldpi (void)
{
return 3.1415926535897932385128089594061862044L;
}
int
main ()
{
long double a = fldlg2 ();
long double b = fldln2 ();
long double c = fldl2e ();
long double d = fldl2t ();
long double e = fldpi ();
static int f[] = { FE_TONEAREST, FE_TOWARDZERO, FE_UPWARD, FE_DOWNWARD };
int i;
for (i = 0; i < 4; i++)
{
fesetround (f[i]);
if (a != fldlg2 ()
|| b != fldln2 ()
|| c != fldl2e ()
|| d != fldl2t ()
|| e != fldpi ())
abort ();
}
return 0;
}
|
