mirror of
https://sourceware.org/git/glibc.git
synced 2024-12-05 11:11:04 +00:00
76f2646f3d
2002-09-09 Jakub Jelinek <jakub@redhat.com> * include/math.h (__finite_internal, __finitef_internal, __finitel_internal, __isinf_internal, __isnan_internal): Remove. (isfinite): Remove. (__finite, __isinf, __isnan, __finitef, __isinff, __isnanf, __finitel, __isinfl, __isnanl): Add hidden_proto. (__fpclassify, __fpclassifyf, __fpclassifyl, __expm1l): Add libm_hidden_proto. * math/Makefile (libm-calls): Add s_isinf and s_isnan. * stdio-common/printf_fp.c (__printf_fp): Remove INTUSE from __is{inf,nan} calls. * stdio-common/printf_size.c (printf_size): Likewise. * sysdeps/generic/printf_fphex.c (__printf_fphex): Likewise. * sysdeps/generic/s_ldexp.c (__ldexp): Likewise. * sysdeps/generic/s_ldexpf.c (__ldexpf): Likewise. * sysdeps/generic/s_ldexpl.c (__ldexpl): Likewise. * sysdeps/generic/s_expm1l.c (__expm1l): Add libm_hidden_def. * sysdeps/i386/fpu/s_finite.S (__finite_internal): Remove alias. (__finite): Add hidden_def. * sysdeps/i386/fpu/s_finitef.S (__finitef_internal): Remove alias. (__finitef): Add hidden_def. * sysdeps/i386/fpu/s_finitel.S (__finitel_internal): Remove alias. (__finitel): Add hidden_def. * sysdeps/i386/fpu/s_isinfl.c (__isinfl): Remove INTDEF. Add hidden_def. * sysdeps/i386/fpu/s_isnanl.c (__isnanl): Likewise. * sysdeps/i386/fpu/s_fpclassifyl.c (__fpclassifyl): Add libm_hidden_def. * sysdeps/i386/fpu/s_expm1l.S (__expm1l): Likewise. * sysdeps/ieee754/dbl-64/s_finite.c (__finite): Remove INTDEF. Add hidden_def. * sysdeps/ieee754/dbl-64/s_isinf.c (__isinf): Likewise. (__isinfl): Remove INTDEF. * sysdeps/ieee754/dbl-64/s_isnan.c (__isnan): Remove INTDEF. Add hidden_def. (__isnanl): Remove INTDEF. * sysdeps/ieee754/dbl-64/s_fpclassify.c (__fpclassify): Add libm_hidden_def. * sysdeps/ieee754/dbl-64/e_lgamma_r.c (sin_pi): Use __sin and __cos instead of sin and cos. * sysdeps/ieee754/flt-32/s_finitef.c (__finitef): Remove INTDEF. Add hidden_def. * sysdeps/ieee754/flt-32/s_isinff.c (__isinff): Likewise. * sysdeps/ieee754/flt-32/s_isnanf.c (__isnanf): Likewise. * sysdeps/ieee754/flt-32/s_fpclassifyf.c (__fpclassifyf): Add libm_hidden_def. * sysdeps/ieee754/ldbl-128/s_finitel.c (__finitel): Remove INTDEF. Add hidden_def. * sysdeps/ieee754/ldbl-128/s_isinfl.c (__isinfl): Likewise. * sysdeps/ieee754/ldbl-128/s_isnanl.c (__isnanl): Likewise. * sysdeps/ieee754/ldbl-128/s_fpclassifyl.c (__fpclassifyl): Add libm_hidden_def. * sysdeps/ieee754/ldbl-128/s_expm1l.c (__expm1l): Add libm_hidden_def. * sysdeps/ieee754/ldbl-96/s_finitel.c (__finitel): Remove INTDEF. Add hidden_def. * sysdeps/ieee754/ldbl-96/s_isinfl.c (__isinfl): Likewise. * sysdeps/ieee754/ldbl-96/s_isnanl.c (__isnanl): Likewise. * sysdeps/ieee754/ldbl-96/s_fpclassifyl.c (__fpclassifyl): Add libm_hidden_def. * sysdeps/ia64/fpu/s_finite.S (__finite_internal, __finitef_internal, __finitel_internal): Remove aliases. (__finite, __finitef, __finitel): Add hidden_def. * sysdeps/ia64/fpu/s_isnan.S (__isnan_internal, __isnanf_internal, __isnanl_internal): Remove aliases. (__isnan, __isnanf, __isnanl): Add hidden_def. * sysdeps/ia64/fpu/s_isinf.S (__isinf_internal, __isinff_internal, __isinfl_internal): Remove aliases. (__isinf, __isinff, __isinfl): Add hidden_def. * sysdeps/ia64/fpu/s_fpclassify.S (__fpclassify, __fpclassifyf, __fpclassifyl): Add libm_hidden_def. * sysdeps/ia64/fpu/s_expm1l.S (__expm1l): Likewise. * sysdeps/m68k/s_isinfl.c (__isinfl): Remove INTDEF. Add hidden_def. * sysdeps/m68k/fpu/s_isinf.c (INTDEFX): Remove. (hidden_defx): Define and use. * sysdeps/m68k/fpu/s_fpclassifyl.c (__fpclassifyl): Add libm_hidden_def. * sysdeps/m68k/fpu/s_expm1l.c (__expm1l): Likewise. * sysdeps/m68k/s_isnanl.c (__isnanl): Add hidden_def. * sysdeps/powerpc/fpu/s_isnan.c (__isnan, __isnanf, __isnanl): Remove INTDEF. (__isnan, __isnanf): Add hidden_def. * sysdeps/x86_64/fpu/s_finitel.S (__finitel_internal): Remove alias. (__finitel): Add libm_hidden_def. * sysdeps/x86_64/fpu/s_expm1l.S (__expm1l): Likewise. * include/fenv.h (feraiseexcept, fesetenv): Add libm_hidden_proto. * sysdeps/alpha/fpu/fesetenv.c (fesetenv): Add libm_hidden_ver. * sysdeps/alpha/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/arm/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/arm/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/generic/fesetenv.c (fesetenv): Likewise. * sysdeps/generic/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/i386/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/i386/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/m68k/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/m68k/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/mips/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/mips/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/powerpc/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/powerpc/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/sparc/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/sparc/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/hppa/fpu/fesetenv.c (fesetenv): Add libm_hidden_def. * sysdeps/hppa/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/ia64/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/ia64/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/sh/sh4/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/sh/sh4/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/s390/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/s390/fpu/fraiseexcpt.c (feraiseexcept): Likewise. * sysdeps/x86_64/fpu/fesetenv.c (fesetenv): Likewise. * sysdeps/x86_64/fpu/fraiseexcpt.c (feraiseexcept): Likewise.
121 lines
3.7 KiB
C
121 lines
3.7 KiB
C
/* Raise given exceptions.
|
|
Copyright (C) 2001, 2002 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Lesser General Public
|
|
License as published by the Free Software Foundation; either
|
|
version 2.1 of the License, or (at your option) any later version.
|
|
|
|
The GNU C Library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public
|
|
License along with the GNU C Library; if not, write to the Free
|
|
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
|
|
02111-1307 USA. */
|
|
|
|
#include <fenv.h>
|
|
#include <math.h>
|
|
|
|
int
|
|
feraiseexcept (int excepts)
|
|
{
|
|
/* Raise exceptions represented by EXPECTS. But we must raise only
|
|
one signal at a time. It is important that if the overflow/underflow
|
|
exception and the inexact exception are given at the same time,
|
|
the overflow/underflow exception follows the inexact exception. */
|
|
|
|
/* First: invalid exception. */
|
|
if ((FE_INVALID & excepts) != 0)
|
|
{
|
|
/* One example of a invalid operation is 0.0 / 0.0. */
|
|
float f = 0.0;
|
|
|
|
__asm__ __volatile__ ("divss %0, %0 " : : "x" (f));
|
|
(void) &f;
|
|
}
|
|
|
|
/* Next: division by zero. */
|
|
if ((FE_DIVBYZERO & excepts) != 0)
|
|
{
|
|
float f = 1.0;
|
|
float g = 0.0;
|
|
|
|
__asm__ __volatile__ ("divss %1, %0" : : "x" (f), "x" (g));
|
|
(void) &f;
|
|
}
|
|
|
|
/* Next: overflow. */
|
|
if ((FE_OVERFLOW & excepts) != 0)
|
|
{
|
|
/* XXX: Is it ok to only set the x87 FPU? */
|
|
/* There is no way to raise only the overflow flag. Do it the
|
|
hard way. */
|
|
fenv_t temp;
|
|
|
|
/* Bah, we have to clear selected exceptions. Since there is no
|
|
`fldsw' instruction we have to do it the hard way. */
|
|
__asm__ __volatile__ ("fnstenv %0" : "=m" (*&temp));
|
|
|
|
/* Set the relevant bits. */
|
|
temp.__status_word |= FE_OVERFLOW;
|
|
|
|
/* Put the new data in effect. */
|
|
__asm__ __volatile__ ("fldenv %0" : : "m" (*&temp));
|
|
|
|
/* And raise the exception. */
|
|
__asm__ __volatile__ ("fwait");
|
|
}
|
|
|
|
/* Next: underflow. */
|
|
if ((FE_UNDERFLOW & excepts) != 0)
|
|
{
|
|
/* XXX: Is it ok to only set the x87 FPU? */
|
|
/* There is no way to raise only the underflow flag. Do it the
|
|
hard way. */
|
|
fenv_t temp;
|
|
|
|
/* Bah, we have to clear selected exceptions. Since there is no
|
|
`fldsw' instruction we have to do it the hard way. */
|
|
__asm__ __volatile__ ("fnstenv %0" : "=m" (*&temp));
|
|
|
|
/* Set the relevant bits. */
|
|
temp.__status_word |= FE_UNDERFLOW;
|
|
|
|
/* Put the new data in effect. */
|
|
__asm__ __volatile__ ("fldenv %0" : : "m" (*&temp));
|
|
|
|
/* And raise the exception. */
|
|
__asm__ __volatile__ ("fwait");
|
|
}
|
|
|
|
/* Last: inexact. */
|
|
if ((FE_INEXACT & excepts) != 0)
|
|
{
|
|
/* XXX: Is it ok to only set the x87 FPU? */
|
|
/* There is no way to raise only the inexact flag. Do it the
|
|
hard way. */
|
|
fenv_t temp;
|
|
|
|
/* Bah, we have to clear selected exceptions. Since there is no
|
|
`fldsw' instruction we have to do it the hard way. */
|
|
__asm__ __volatile__ ("fnstenv %0" : "=m" (*&temp));
|
|
|
|
/* Set the relevant bits. */
|
|
temp.__status_word |= FE_INEXACT;
|
|
|
|
/* Put the new data in effect. */
|
|
__asm__ __volatile__ ("fldenv %0" : : "m" (*&temp));
|
|
|
|
/* And raise the exception. */
|
|
__asm__ __volatile__ ("fwait");
|
|
}
|
|
|
|
/* Success. */
|
|
return 0;
|
|
}
|
|
libm_hidden_def (feraiseexcept)
|