a8dce6197a
Continuing the use of generic macros for defining libm function aliases, in preparation for adding more _FloatN / _FloatNx function names, this patch makes the lgamma_r functions use such macros. declare_mgen_alias_r becomes a standard macro in math-type-macros.h instead of being locally defined in w_lgamma_r_templace.c. This in turn must be defined by each math-type-macros-<type>.h. Rather than providing an unused default in math-type-macros.h, that header is made to give an error if math-type-macros-<type>.h failed to define declare_mgen_alias or declare_mgen_alias_r. The compat lgamma_r wrappers are updated similarly. The ldbl-opt versions are removed as no longer needed. Tested for x86_64, and with build-many-glibcs.py. Installed stripped shared libraries are unchanged except for powerpc64le (where the usual issue applies that an ldbl-opt long double function previously used long_double_symbol unconditionally and now the symbol versions on powerpc64le mean weak_alias is used instead, resulting in the same symbol versions in the final shared library but still enough difference in the input objects for that library not to be byte-identical). * sysdeps/generic/math-type-macros.h [!declare_mgen_alias]: Give error. Remove default definition of declare_mgen_alias. [!declare_mgen_alias_r]: Likewise. * sysdeps/generic/math-type-macros-double.h [!declare_mgen_alias_r] (declare_mgen_alias_r): New macro. * sysdeps/generic/math-type-macros-float.h [!declare_mgen_alias_r] (declare_mgen_alias_r): Likewise. * sysdeps/generic/math-type-macros-float128.h [!declare_mgen_alias_r] (declare_mgen_alias_r): Likewise. * sysdeps/generic/math-type-macros-ldouble.h [!declare_mgen_alias_r] (declare_mgen_alias_r): Likewise. * math/w_lgamma_r_template.c (declare_mgen_alias_r_x): Remove macro. (declare_mgen_alias_r_s): Likewise. (declare_mgen_alias_r): Likewise. * math/w_lgamma_r_compat.c: Include <libm-alias-double.h>. (lgamma_r): Define using libm_alias_double_r. * math/w_lgammaf_r_compat.c: Include <libm-alias-float.h>. (lgammaf_r): Define using libm_alias_float_r. * math/w_lgammal_r_compat.c: Include <libm-alias-ldouble.h>. (lgammal_r): Define using libm_alias_ldouble_r. * sysdeps/ieee754/ldbl-opt/w_lgamma_r_compat.c: Remove file. * sysdeps/ieee754/ldbl-opt/w_lgammal_r_compat.c: Likewise.
113 lines
3.5 KiB
C
113 lines
3.5 KiB
C
/* Helper macros for type generic function implementations within libm.
|
|
Copyright (C) 2016-2017 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, see
|
|
<http://www.gnu.org/licenses/>. */
|
|
|
|
#ifndef _MATH_TYPE_MACROS
|
|
#define _MATH_TYPE_MACROS
|
|
|
|
/* Each type imports a header which is expected to
|
|
define:
|
|
|
|
M_LIT(x) - Paste the type specific suffix onto the constant x.
|
|
M_MLIT(x) - Paste the type specific suffix used by the macro
|
|
constants in math.h, i.e M_PI or M_PIl.
|
|
M_PFX - The prefixed used by float.h macros like FLT_MANT_DIG.
|
|
M_SUF(x) - Paste the the type specific suffix used by functions
|
|
i.e expf expl exp.
|
|
FLOAT - Resolves to the C typename of M_TYPE.
|
|
CFLOAT - Resolves to the complex typename of M_TYPE.
|
|
M_STRTO_NAN - Resolves to the internal libc function which
|
|
converts a string into the appropriate FLOAT nan
|
|
value.
|
|
|
|
declare_mgen_alias(from,to)
|
|
This exposes the appropriate symbol(s) for a
|
|
function f of type FLOAT.
|
|
|
|
declare_mgen_alias_r(from,to)
|
|
This exposes the appropriate symbol(s) for a
|
|
function f_r of type FLOAT. */
|
|
|
|
#ifndef M_PFX
|
|
# error "M_PFX must be defined."
|
|
#endif
|
|
#ifndef M_LIT
|
|
# error "M_LIT must be defined."
|
|
#endif
|
|
#ifndef M_MLIT
|
|
# error "M_MLIT must be defined."
|
|
#endif
|
|
#ifndef M_SUF
|
|
# error "M_SUF must be defined."
|
|
#endif
|
|
#ifndef FLOAT
|
|
# error "FLOAT must be defined."
|
|
#endif
|
|
#ifndef CFLOAT
|
|
# error "CFLOAT must be defined."
|
|
#endif
|
|
#ifndef declare_mgen_alias
|
|
# error "declare_mgen_alias must be defined."
|
|
#endif
|
|
#ifndef declare_mgen_alias_r
|
|
# error "declare_mgen_alias_r must be defined."
|
|
#endif
|
|
|
|
#define __M_CONCAT(a,b) a ## b
|
|
#define __M_CONCATX(a,b) __M_CONCAT(a,b)
|
|
|
|
#define M_NAN M_SUF (__builtin_nan) ("")
|
|
#define M_MIN_EXP __M_CONCATX (M_PFX, _MIN_EXP)
|
|
#define M_MAX_EXP __M_CONCATX (M_PFX, _MAX_EXP)
|
|
#define M_MIN __M_CONCATX (M_PFX, _MIN)
|
|
#define M_MAX __M_CONCATX (M_PFX, _MAX)
|
|
#define M_MANT_DIG __M_CONCATX (M_PFX, _MANT_DIG)
|
|
#define M_HUGE_VAL (M_SUF (__builtin_huge_val) ())
|
|
|
|
/* Helper macros for commonly used functions. */
|
|
#define M_COPYSIGN M_SUF (__copysign)
|
|
#define M_FABS M_SUF (fabs)
|
|
#define M_SINCOS M_SUF (__sincos)
|
|
#define M_SCALBN M_SUF (__scalbn)
|
|
#define M_LOG1P M_SUF (__log1p)
|
|
|
|
#define M_ATAN2 M_SUF (__ieee754_atan2)
|
|
#define M_COSH M_SUF (__ieee754_cosh)
|
|
#define M_EXP M_SUF (__ieee754_exp)
|
|
#define M_HYPOT M_SUF (__ieee754_hypot)
|
|
#define M_LOG M_SUF (__ieee754_log)
|
|
#define M_SINH M_SUF (__ieee754_sinh)
|
|
#define M_SQRT M_SUF (__ieee754_sqrt)
|
|
|
|
/* Needed to evaluate M_MANT_DIG below. */
|
|
#include <float.h>
|
|
|
|
/* Use a special epsilon value for IBM long double
|
|
to avoid spurious overflows/underflows. */
|
|
#if M_MANT_DIG != 106
|
|
# define M_EPSILON __M_CONCATX (M_PFX, _EPSILON)
|
|
#else
|
|
# define M_EPSILON M_LIT (0x1p-106)
|
|
#endif
|
|
|
|
/* Enable overloading of function name to assist reuse. */
|
|
#ifndef M_DECL_FUNC
|
|
# define M_DECL_FUNC(f) M_SUF (f)
|
|
#endif
|
|
|
|
#endif /* _MATH_TYPE_MACROS */
|