+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.
+
2002-09-09 Steven Munroe <sjmunroe@us.ibm.com>
* elf/elf.h: Add powerpc64 specific elf relocation and dynamic types.
extern int __fesetenv (__const fenv_t *__envp);
extern int __feupdateenv (__const fenv_t *__envp);
+libm_hidden_proto (feraiseexcept)
+libm_hidden_proto (fesetenv)
+
#endif
/* Now define the internal interfaces. */
extern int __matherr (struct exception *__exc);
-extern int __finite_internal (double __value)
- __attribute__ ((__const__)) attribute_hidden;
-extern int __finitef_internal (float __value)
- __attribute__ ((__const__)) attribute_hidden;
-
-extern int __isinf_internal (double __value)
- __attribute__ ((__const__)) attribute_hidden;
-extern int __isnan_internal (double __value)
- __attribute__ ((__const__)) attribute_hidden;
-
-#ifndef __NO_LONG_DOUBLE_MATH
-extern int __finitel_internal (long double __value)
- __attribute__ ((__const__)) attribute_hidden;
+# if !defined NOT_IN_libc || defined IS_IN_libm
+hidden_proto (__finite)
+hidden_proto (__isinf)
+hidden_proto (__isnan)
+hidden_proto (__finitef)
+hidden_proto (__isinff)
+hidden_proto (__isnanf)
+
+# ifndef __NO_LONG_DOUBLE_MATH
+hidden_proto (__finitel)
+hidden_proto (__isinfl)
+hidden_proto (__isnanl)
+# endif
+# endif
-extern int __isinfl_internal (long double __value)
- __attribute__ ((__const__)) attribute_hidden;
-extern int __isnanl_internal (long double __value)
- __attribute__ ((__const__)) attribute_hidden;
-#endif
+libm_hidden_proto (__fpclassify)
+libm_hidden_proto (__fpclassifyf)
-#if !defined NOT_IN_libc || defined IS_IN_libm
-# undef isfinite
-# ifdef __NO_LONG_DOUBLE_MATH
-# define isfinite(x) \
- (sizeof (x) == sizeof (float) \
- ? INTUSE(__finitef) (x) : INTUSE(__finite) (x))
-# else
-# define isfinite(x) \
- (sizeof (x) == sizeof (float) \
- ? INTUSE(__finitef) (x) \
- : sizeof (x) == sizeof (double) \
- ? INTUSE(__finite) (x) : INTUSE(__finitel) (x))
+# ifndef __NO_LONG_DOUBLE_MATH
+libm_hidden_proto (__fpclassifyl)
+libm_hidden_proto (__expm1l)
# endif
-#endif
-
#endif
conj cimag creal cabs carg s_cexp s_csinh s_ccosh s_clog \
s_catan s_casin s_ccos s_csin s_ctan s_ctanh s_cacos \
s_casinh s_cacosh s_catanh s_csqrt s_cpow s_cproj s_clog10 \
- s_fma s_lrint s_llrint s_lround s_llround e_exp10 w_log2
+ s_fma s_lrint s_llrint s_lround s_llround e_exp10 w_log2 \
+ s_isinf s_isnan
dbl-only-routines := branred doasin dosincos halfulp mpa mpatan2 \
mpatan mpexp mplog mpsqrt mptan sincos32 slowexp \
slowpow
fpnum.ldbl = *(const long double *) args[0];
/* Check for special values: not a number or infinity. */
- if (INTUSE(__isnanl) (fpnum.ldbl))
+ if (__isnanl (fpnum.ldbl))
{
if (isupper (info->spec))
{
}
is_neg = 0;
}
- else if (INTUSE(__isinfl) (fpnum.ldbl))
+ else if (__isinfl (fpnum.ldbl))
{
if (isupper (info->spec))
{
fpnum.dbl = *(const double *) args[0];
/* Check for special values: not a number or infinity. */
- if (INTUSE(__isnan) (fpnum.dbl))
+ if (__isnan (fpnum.dbl))
{
if (isupper (info->spec))
{
}
is_neg = 0;
}
- else if (INTUSE(__isinf) (fpnum.dbl))
+ else if (__isinf (fpnum.dbl))
{
if (isupper (info->spec))
{
fpnum.ldbl.d = *(const long double *) args[0];
/* Check for special values: not a number or infinity. */
- if (INTUSE(__isnanl) (fpnum.ldbl.d))
+ if (__isnanl (fpnum.ldbl.d))
{
special = "nan";
wspecial = L"nan";
negative = 0;
}
- else if (INTUSE(__isinfl) (fpnum.ldbl.d))
+ else if (__isinfl (fpnum.ldbl.d))
{
special = "inf";
wspecial = L"inf";
fpnum.dbl.d = *(const double *) args[0];
/* Check for special values: not a number or infinity. */
- if (INTUSE(__isnan) (fpnum.dbl.d))
+ if (__isnan (fpnum.dbl.d))
{
special = "nan";
wspecial = L"nan";
negative = 0;
}
- else if (INTUSE(__isinf) (fpnum.dbl.d))
+ else if (__isinf (fpnum.dbl.d))
{
special = "inf";
wspecial = L"inf";
/* Install given floating-point environment.
- Copyright (C) 1997,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,99,2000,01,02 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Richard Henderson <rth@tamu.edu>, 1997
compat_symbol (libm, __old_fesetenv, fesetenv, GLIBC_2_1);
#endif
+libm_hidden_ver (__fesetenv, fesetenv)
versioned_symbol (libm, __fesetenv, fesetenv, GLIBC_2_2);
/* Raise given exceptions.
- Copyright (C) 1997,98,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,98,99,2000,01,02 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Richard Henderson <rth@tamu.edu>, 1997.
compat_symbol (libm, __old_feraiseexcept, feraiseexcept, GLIBC_2_1);
#endif
+libm_hidden_ver (__feraiseexcept, feraiseexcept)
versioned_symbol (libm, __feraiseexcept, feraiseexcept, GLIBC_2_2);
/* Install given floating-point environment.
- Copyright (C) 1997,98,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,98,99,2000,01,02 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
compat_symbol (libm, __old_fesetenv, fesetenv, GLIBC_2_1);
#endif
+libm_hidden_ver (__fesetenv, fesetenv)
versioned_symbol (libm, __fesetenv, fesetenv, GLIBC_2_2);
/* Raise given exceptions.
- Copyright (C) 1997,98,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,98,99,2000,01,02 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
compat_symbol (libm, __old_feraiseexcept, feraiseexcept, GLIBC_2_1);
#endif
+libm_hidden_ver (__feraiseexcept, feraiseexcept)
versioned_symbol (libm, __feraiseexcept, feraiseexcept, GLIBC_2_2);
/* Install given floating-point environment.
- Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1999, 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
strong_alias (__fesetenv, __old_fesetenv)
compat_symbol (libm, __old_fesetenv, fesetenv, GLIBC_2_1);
#endif
+libm_hidden_ver (__fesetenv, fesetenv)
versioned_symbol (libm, __fesetenv, fesetenv, GLIBC_2_2);
stub_warning (fesetenv)
/* Raise given exceptions.
- Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1999, 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
strong_alias (__feraiseexcept, __old_feraiseexcept)
compat_symbol (libm, __old_feraiseexcept, feraiseexcept, GLIBC_2_1);
#endif
+libm_hidden_ver (__feraiseexcept, feraiseexcept)
versioned_symbol (libm, __feraiseexcept, feraiseexcept, GLIBC_2_2);
stub_warning (feraiseexcept)
fpnum.ldbl.d = *(const long double *) args[0];
/* Check for special values: not a number or infinity. */
- if (INTUSE(__isnanl) (fpnum.ldbl.d))
+ if (__isnanl (fpnum.ldbl.d))
{
if (isupper (info->spec))
{
}
else
{
- if (INTUSE(__isinfl) (fpnum.ldbl.d))
+ if (__isinfl (fpnum.ldbl.d))
{
if (isupper (info->spec))
{
fpnum.dbl.d = *(const double *) args[0];
/* Check for special values: not a number or infinity. */
- if (INTUSE(__isnan) (fpnum.dbl.d))
+ if (__isnan (fpnum.dbl.d))
{
if (isupper (info->spec))
{
}
else
{
- if (INTUSE(__isinf) (fpnum.dbl.d))
+ if (__isinf (fpnum.dbl.d))
{
if (isupper (info->spec))
{
__set_errno (ENOSYS);
return 0.0;
}
+libm_hidden_def (__expm1l)
weak_alias (__expm1l, expm1l)
stub_warning (expm1l)
double value; int exp;
#endif
{
- if(!INTUSE(__finite)(value)||value==0.0) return value;
+ if(!__finite(value)||value==0.0) return value;
value = __scalbn(value,exp);
- if(!INTUSE(__finite)(value)||value==0.0) __set_errno (ERANGE);
+ if(!__finite(value)||value==0.0) __set_errno (ERANGE);
return value;
}
weak_alias (__ldexp, ldexp)
float value; int exp;
#endif
{
- if(!INTUSE(__finitef)(value)||value==(float)0.0) return value;
+ if(!__finitef(value)||value==(float)0.0) return value;
value = __scalbnf(value,exp);
- if(!INTUSE(__finitef)(value)||value==(float)0.0) __set_errno (ERANGE);
+ if(!__finitef(value)||value==(float)0.0) __set_errno (ERANGE);
return value;
}
INTDEF(__ldexpf)
long double value; int exp;
#endif
{
- if(!INTUSE(__finitel)(value)||value==0.0) return value;
+ if(!__finitel(value)||value==0.0) return value;
value = __scalbnl(value,exp);
- if(!INTUSE(__finitel)(value)||value==0.0) __set_errno (ERANGE);
+ if(!__finitel(value)||value==0.0) __set_errno (ERANGE);
return value;
}
weak_alias (__ldexpl, ldexpl)
/* Install given floating-point environment.
- Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1999, 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by David Huggins-Daines <dhd@debian.org>, 2000
Based on the m68k version by
/* Success. */
return 0;
}
+libm_hidden_def (fesetenv)
/* Raise given exceptions.
- Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1999, 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by David Huggins-Daines <dhd@debian.org>
/* Success. */
return 0;
}
+libm_hidden_def (feraiseexcept)
/* Install given floating-point environment.
- Copyright (C) 1997,98,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,98,99,2000,01,02 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
compat_symbol (libm, BP_SYM (__old_fesetenv), BP_SYM (fesetenv), GLIBC_2_1);
#endif
+libm_hidden_ver (__fesetenv, fesetenv)
versioned_symbol (libm, BP_SYM (__fesetenv), BP_SYM (fesetenv), GLIBC_2_2);
/* Raise given exceptions.
- Copyright (C) 1997,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,99,2000,01,02 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
compat_symbol (libm, __old_feraiseexcept, feraiseexcept, GLIBC_2_1);
#endif
+libm_hidden_ver (__feraiseexcept, feraiseexcept)
versioned_symbol (libm, __feraiseexcept, feraiseexcept, GLIBC_2_2);
/* ix87 specific implementation of exp(x)-1.
- Copyright (C) 1996, 1997 Free Software Foundation, Inc.
+ Copyright (C) 1996, 1997, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
Based on code by John C. Bowman <bowman@ipp-garching.mpg.de>.
fldl MO(minus1) // Set result to -1.0.
3: ret
END(__expm1l)
+libm_hidden_def (__expm1l)
weak_alias (__expm1l, expm1l)
shrl $31, %eax
ret
END (__finite)
-strong_alias(__finite, __finite_internal)
weak_alias (__finite, finite)
+hidden_def (__finite)
+
shrl $31,%eax
ret
END (__finitef)
-strong_alias(__finitef, __finitef_internal)
weak_alias (__finitef, finitef)
+hidden_def (__finitef)
shrl $31, %eax
ret
END (__finitel)
-strong_alias(__finitel, __finitel_internal)
weak_alias (__finitel, finitel)
+hidden_def (__finitel)
/* Return classification value corresponding to argument.
- Copyright (C) 1997, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
return retval;
}
+libm_hidden_def (__fpclassifyl)
se &= 0x8000;
return ~(lx >> 31) & (1 - (se >> 14));
}
-INTDEF(__isinfl)
+hidden_def (__isinfl)
weak_alias (__isinfl, isinfl)
se = 0xfffe - se;
return (int)((u_int32_t)(se))>>16;
}
-INTDEF(__isnanl)
+hidden_def (__isnanl)
weak_alias (__isnanl, isnanl)
/* Install given floating-point environment.
- Copyright (C) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1998, 1999, 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Jes Sorensen <Jes.Sorensen@cern.ch>, 2000
return 0;
}
+libm_hidden_def (fesetenv)
/* Raise given exceptions.
- Copyright (C) 1997, 1998, 2000, 2001 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1998, 2000, 2001, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Jes Sorensen <Jes.Sorensen@cern.ch>, 2000.
/* Success. */
return 0;
}
+libm_hidden_def (feraiseexcept)
.endp expm1l
ASM_SIZE_DIRECTIVE(expm1l)
+#ifdef _LIBC
+libm_hidden_def (__expm1l)
+#endif
+
.section .text
.proc expl#
.global expl#
-/* Copyright (C) 2000 Free Software Foundation, Inc.
+/* Copyright (C) 2000, 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
}
END (__finite)
-strong_alias (__finite, __finite_internal)
strong_alias (__finite, __finitef)
-strong_alias (__finitef, __finitef_internal)
strong_alias (__finite, __finitel)
-strong_alias (__finitel, __finitel_internal)
weak_alias (__finite, finite)
weak_alias (__finitef, finitef)
weak_alias (__finitel, finitel)
+
+hidden_def (__finite)
+hidden_def (__finitef)
+hidden_def (__finitel)
/* Return classification value corresponding to argument.
- Copyright (C) 2000 Free Software Foundation, Inc.
+ Copyright (C) 2000, 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
strong_alias (__fpclassify, __fpclassifyf)
strong_alias (__fpclassify, __fpclassifyl)
+libm_hidden_def (__fpclassify)
+libm_hidden_def (__fpclassifyf)
+libm_hidden_def (__fpclassifyl)
}
END (__isinf)
-strong_alias (__isinf, __isinf_internal)
strong_alias (__isinf, __isinff)
-strong_alias (__isinff, __isinff_internal)
strong_alias (__isinf, __isinfl)
-strong_alias (__isinfl, __isinfl_internal)
weak_alias (__isinf, isinf)
weak_alias (__isinff, isinff)
weak_alias (__isinfl, isinfl)
+
+hidden_def (__isinf)
+hidden_def (__isinff)
+hidden_def (__isinfl)
}
END (__isnan)
-strong_alias (__isnan, __isnan_internal)
strong_alias (__isnan, __isnanf)
-strong_alias (__isnanf, __isnanf_internal)
strong_alias (__isnan, __isnanl)
-strong_alias (__isnanl, __isnanl_internal)
weak_alias (__isnan, isnan)
weak_alias (__isnanf, isnanf)
weak_alias (__isnanl, isnanl)
+
+hidden_def (__isnan)
+hidden_def (__isnanf)
+hidden_def (__isnanl)
GET_HIGH_WORD(ix,x);
ix &= 0x7fffffff;
- if(ix<0x3fd00000) return sin(pi*x);
+ if(ix<0x3fd00000) return __sin(pi*x);
y = -x; /* x is assume negative */
/*
}
}
switch (n) {
- case 0: y = sin(pi*y); break;
+ case 0: y = __sin(pi*y); break;
case 1:
- case 2: y = cos(pi*(0.5-y)); break;
+ case 2: y = __cos(pi*(0.5-y)); break;
case 3:
- case 4: y = sin(pi*(one-y)); break;
+ case 4: y = __sin(pi*(one-y)); break;
case 5:
- case 6: y = -cos(pi*(y-1.5)); break;
- default: y = sin(pi*(y-2.0)); break;
+ case 6: y = -__cos(pi*(y-1.5)); break;
+ default: y = __sin(pi*(y-2.0)); break;
}
return -y;
}
#include "math.h"
#include "math_private.h"
-#undef __finite
-
#ifdef __STDC__
int __finite(double x)
#else
GET_HIGH_WORD(hx,x);
return (int)((u_int32_t)((hx&0x7fffffff)-0x7ff00000)>>31);
}
-INTDEF(__finite)
+hidden_def (__finite)
weak_alias (__finite, finite)
#ifdef NO_LONG_DOUBLE
strong_alias (__finite, __finitel)
/* Return classification value corresponding to argument.
- Copyright (C) 1997 Free Software Foundation, Inc.
+ Copyright (C) 1997, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
return retval;
}
+libm_hidden_def (__fpclassify)
lx |= -lx;
return ~(lx >> 31) & (hx >> 30);
}
-INTDEF(__isinf)
+hidden_def (__isinf)
weak_alias (__isinf, isinf)
#ifdef NO_LONG_DOUBLE
strong_alias (__isinf, __isinfl)
-INTDEF(__isinfl)
weak_alias (__isinf, isinfl)
#endif
hx = 0x7ff00000 - hx;
return (int)(((u_int32_t)hx)>>31);
}
-INTDEF(__isnan)
+hidden_def (__isnan)
weak_alias (__isnan, isnan)
#ifdef NO_LONG_DOUBLE
strong_alias (__isnan, __isnanl)
-INTDEF(__isnanl)
weak_alias (__isnan, isnanl)
#endif
#include "math.h"
#include "math_private.h"
-#undef __finitef
-
#ifdef __STDC__
int __finitef(float x)
#else
GET_FLOAT_WORD(ix,x);
return (int)((u_int32_t)((ix&0x7fffffff)-0x7f800000)>>31);
}
-INTDEF(__finitef)
+hidden_def (__finitef)
weak_alias (__finitef, finitef)
/* Return classification value corresponding to argument.
- Copyright (C) 1997, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
return retval;
}
+libm_hidden_def (__fpclassifyf)
t |= -t;
return ~(t >> 31) & (ix >> 30);
}
-INTDEF(__isinff)
+hidden_def (__isinff)
weak_alias (__isinff, isinff)
ix = 0x7f800000 - ix;
return (int)(((u_int32_t)(ix))>>31);
}
-INTDEF(__isnanf)
+hidden_def (__isnanf)
weak_alias (__isnanf, isnanf)
x = px * qx + (px - 1.0);
return x;
}
-
+libm_hidden_def (__expm1l)
weak_alias (__expm1l, expm1l)
#include "math.h"
#include "math_private.h"
-#undef __finitel
-
#ifdef __STDC__
int __finitel(long double x)
#else
return (int)((u_int64_t)((hx&0x7fffffffffffffffLL)
-0x7fff000000000000LL)>>63);
}
-INTDEF(__finitel)
+hidden_def (__finitel)
weak_alias (__finitel, finitel)
/* Return classification value corresponding to argument.
- Copyright (C) 1997, 1999 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1999, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997 and
Jakub Jelinek <jj@ultra.linux.cz>, 1999.
return retval;
}
+libm_hidden_def (__fpclassifyl)
lx |= -lx;
return ~(lx >> 63) & (hx >> 62);
}
-INTDEF(__isinfl)
+hidden_def (__isinfl)
weak_alias (__isinfl, isinfl)
hx = 0x7fff000000000000LL - hx;
return (int)((u_int64_t)hx>>63);
}
-INTDEF(__isnanl)
+hidden_def (__isnanl)
weak_alias (__isnanl, isnanl)
#include "math.h"
#include "math_private.h"
-#undef __finitel
-
#ifdef __STDC__
int __finitel(long double x)
#else
GET_LDOUBLE_EXP(exp,x);
return (int)((u_int32_t)((exp&0x7fff)-0x7fff)>>31);
}
-INTDEF(__finitel)
+hidden_def (__finitel)
weak_alias (__finitel, finitel)
/* Return classification value corresponding to argument.
- Copyright (C) 1997 Free Software Foundation, Inc.
+ Copyright (C) 1997, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
Fixed by Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>.
return retval;
}
+libm_hidden_def (__fpclassifyl)
se &= 0x8000;
return ~(lx >> 31) & (1 - (se >> 14));
}
-INTDEF(__isinfl)
+hidden_def (__isinfl)
weak_alias (__isinfl, isinfl)
se = 0xfffe - se;
return (int)(((u_int32_t)(se))>>31);
}
+hidden_def (__isnanl)
weak_alias (__isnanl, isnanl)
/* Install given floating-point environment.
- Copyright (C) 1997,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,99,2000,01,02 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
compat_symbol (libm, __old_fesetenv, fesetenv, GLIBC_2_1);
#endif
+libm_hidden_ver (__fesetenv, fesetenv)
versioned_symbol (libm, __fesetenv, fesetenv, GLIBC_2_2);
/* Raise given exceptions.
- Copyright (C) 1997,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,99,2000,01,02 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Andreas Schwab <schwab@issan.informatik.uni-dortmund.de>
compat_symbol (libm, __old_feraiseexcept, feraiseexcept, GLIBC_2_1);
#endif
+libm_hidden_ver (__feraiseexcept, feraiseexcept)
versioned_symbol (libm, __feraiseexcept, feraiseexcept, GLIBC_2_2);
#define FUNC expm1l
#include <s_atanl.c>
+libm_hidden_def (__expm1l)
/* Return classification value corresponding to argument. m68k version.
- Copyright (C) 1997,2001 Free Software Foundation, Inc.
+ Copyright (C) 1997, 2001, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
Fixed for m68k by Andreas Schwab <schwab@suse.de>.
return retval;
}
+libm_hidden_def (__fpclassifyl)
return __m81_u(__CONCATX(__,FUNC))(x);
}
-#define INTDEFX(a) INTDEF(a)
-INTDEFX(__CONCATX(__,FUNC))
+#define hidden_defx(a) hidden_def(a)
+hidden_defx(__CONCATX(__,FUNC))
#define weak_aliasx(a,b) weak_alias(a,b)
weak_aliasx (__CONCATX(__,FUNC), FUNC)
#include <math.h>
#include "ieee754.h"
-#undef __isinfl
-#undef isinfl
-
-
/* Return 0 if VALUE is finite or NaN, +1 if it
is +Infinity, -1 if it is -Infinity. */
int
return 0;
}
-INTDEF(__isinfl)
+hidden_def (__isinfl)
weak_alias (__isinfl, isinfl);
-/* Copyright (C) 1991, 1992, 1995, 1997 Free Software Foundation, Inc.
+/* Copyright (C) 1991, 1992, 1995, 1997, 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
#include <math.h>
#include "ieee754.h"
-#undef __isnanl
-#undef isnanl
-
-
/* Return nonzero if VALUE is not a number. */
int
__isnanl (long double value)
((u.ieee.mantissa0 & 0x7fffffff) != 0 || u.ieee.mantissa1 != 0));
}
+hidden_def (__isnanl)
weak_alias (__isnanl, isnanl);
/* Install given floating-point environment.
- Copyright (C) 1998, 1999, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1998, 1999, 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Andreas Jaeger <aj@suse.de>, 1998.
strong_alias (__fesetenv, __old_fesetenv)
compat_symbol (libm, __old_fesetenv, fesetenv, GLIBC_2_1);
#endif
+libm_hidden_ver (__fesetenv, fesetenv)
versioned_symbol (libm, __fesetenv, fesetenv, GLIBC_2_2);
strong_alias (__feraiseexcept, __old_feraiseexcept)
compat_symbol (libm, __old_feraiseexcept, feraiseexcept, GLIBC_2_1);
#endif
+libm_hidden_ver (__feraiseexcept, feraiseexcept)
versioned_symbol (libm, __feraiseexcept, feraiseexcept, GLIBC_2_2);
/* Install given floating-point environment.
- Copyright (C) 1997,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,99,2000,01,02 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
compat_symbol (libm, BP_SYM (__old_fesetenv), BP_SYM (fesetenv), GLIBC_2_1);
#endif
+libm_hidden_ver (__fesetenv, fesetenv)
versioned_symbol (libm, BP_SYM (__fesetenv), BP_SYM (fesetenv), GLIBC_2_2);
/* Raise given exceptions.
- Copyright (C) 1997,99,2000,01 Free Software Foundation, Inc.
+ Copyright (C) 1997,99,2000,01,02 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
compat_symbol (libm, BP_SYM (__old_feraiseexcept), BP_SYM (feraiseexcept), GLIBC_2_1);
#endif
+libm_hidden_ver (__feraiseexcept, feraiseexcept)
versioned_symbol (libm, BP_SYM (__feraiseexcept), BP_SYM (feraiseexcept), GLIBC_2_2);
fesetenv_register (savedstate);
return result;
}
-INTDEF(__isnan)
+hidden_def (__isnan)
weak_alias (__isnan, isnan)
/* It turns out that the 'double' version will also always work for
single-precision. */
-#undef __isnanf
-#undef isnanf
strong_alias (__isnan, __isnanf)
-INTDEF(__isnanf)
+hidden_def (__isnanf)
weak_alias (__isnanf, isnanf)
#ifdef NO_LONG_DOUBLE
strong_alias (__isnan, __isnanl)
-INTDEF(__isnanl)
weak_alias (__isnan, isnanl)
#endif
/* Install given floating-point environment.
- Copyright (C) 2000 Free Software Foundation, Inc.
+ Copyright (C) 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Denis Joseph Barrow (djbarrow@de.ibm.com).
/* Success. */
return 0;
}
+libm_hidden_def (fesetenv)
/* Raise given exceptions.
- Copyright (C) 2000 Free Software Foundation, Inc.
+ Copyright (C) 2000, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Denis Joseph Barrow (djbarrow@de.ibm.com) and
Martin Schwidefsky (schwidefsky@de.ibm.com).
/* Success. */
return 0;
}
+libm_hidden_def (feraiseexcept)
/* Install given floating-point environment.
- Copyright (C) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1998, 1999, 2000, 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
}
return 0;
}
+libm_hidden_def (fesetenv)
/* Raise given exceptions.
- Copyright (C) 1997, 1998, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1998, 2000, 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
return 0;
}
+libm_hidden_def (feraiseexcept)
/* Install given floating-point environment.
- Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1999, 2000, 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
compat_symbol (libm, __old_fesetenv, fesetenv, GLIBC_2_1);
#endif
+libm_hidden_ver (__fesetenv, fesetenv)
versioned_symbol (libm, __fesetenv, fesetenv, GLIBC_2_2);
/* Raise given exceptions.
- Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc.
+ Copyright (C) 1997, 1999, 2000, 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
compat_symbol (libm, __old_feraiseexcept, feraiseexcept, GLIBC_2_1);
#endif
+libm_hidden_ver (__feraiseexcept, feraiseexcept)
versioned_symbol (libm, __feraiseexcept, feraiseexcept, GLIBC_2_2);
/* Install given floating-point environment.
- Copyright (C) 2001 Free Software Foundation, Inc.
+ 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
/* Success. */
return 0;
}
+libm_hidden_def (fesetenv)
/* Raise given exceptions.
- Copyright (C) 2001 Free Software Foundation, Inc.
+ 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
/* Success. */
return 0;
}
+libm_hidden_def (feraiseexcept)
/* ix87 specific implementation of exp(x)-1.
- Copyright (C) 1996, 1997, 2001 Free Software Foundation, Inc.
+ Copyright (C) 1996, 1997, 2001, 2002 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
Based on code by John C. Bowman <bowman@ipp-garching.mpg.de>.
fldl MO(minus1) // Set result to -1.0.
3: ret
END(__expm1l)
+libm_hidden_def (__expm1l)
weak_alias (__expm1l, expm1l)
shrl $31, %eax
ret
END (__finitel)
-strong_alias(__finitel, __finitel_internal)
weak_alias (__finitel, finitel)
+hidden_def (__finitel)
git://sourceware.org / glibc.git / commitdiff