mirror of
https://sourceware.org/git/glibc.git
synced 2025-06-03 13:22:05 +03:00
abd383584b
This patch adds the narrowing square root functions from TS 18661-1 / TS 18661-3 / C2X to glibc's libm: fsqrt, fsqrtl, dsqrtl, f32sqrtf64, f32sqrtf32x, f32xsqrtf64 for all configurations; f32sqrtf64x, f32sqrtf128, f64sqrtf64x, f64sqrtf128, f32xsqrtf64x, f32xsqrtf128, f64xsqrtf128 for configurations with _Float64x and _Float128; __f32sqrtieee128 and __f64sqrtieee128 aliases in the powerpc64le case (for calls to fsqrtl and dsqrtl when long double is IEEE binary128). Corresponding tgmath.h macro support is also added. The changes are mostly similar to those for the other narrowing functions previously added, so the description of those generally applies to this patch as well. However, the not-actually-narrowing cases (where the two types involved in the function have the same floating-point format) are aliased to sqrt, sqrtl or sqrtf128 rather than needing a separately built not-actually-narrowing function such as was needed for add / sub / mul / div. Thus, there is no __nldbl_dsqrtl name for ldbl-opt because no such name was needed (whereas the other functions needed such a name since the only other name for that entry point was e.g. f32xaddf64, not reserved by TS 18661-1); the headers are made to arrange for sqrt to be called in that case instead. The DIAG_* calls in sysdeps/ieee754/soft-fp/s_dsqrtl.c are because they were observed to be needed in GCC 7 testing of riscv32-linux-gnu-rv32imac-ilp32. The other sysdeps/ieee754/soft-fp/ files added didn't need such DIAG_* in any configuration I tested with build-many-glibcs.py, but if they do turn out to be needed in more files with some other configuration / GCC version, they can always be added there. I reused the same test inputs in auto-libm-test-in as for non-narrowing sqrt rather than adding extra or separate inputs for narrowing sqrt. The tests in libm-test-narrow-sqrt.inc also follow those for non-narrowing sqrt. Tested as followed: natively with the full glibc testsuite for x86_64 (GCC 11, 7, 6) and x86 (GCC 11); with build-many-glibcs.py with GCC 11, 7 and 6; cross testing of math/ tests for powerpc64le, powerpc32 hard float, mips64 (all three ABIs, both hard and soft float). The different GCC versions are to cover the different cases in tgmath.h and tgmath.h tests properly (GCC 6 has _Float* only as typedefs in glibc headers, GCC 7 has proper _Float* support, GCC 8 adds __builtin_tgmath).
143 lines
4.3 KiB
C
143 lines
4.3 KiB
C
/* Helper macros for type generic function implementations within libm.
|
|
Copyright (C) 2016-2021 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
|
|
<https://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.
|
|
|
|
declare_mgen_alias_narrow(from,to)
|
|
This exposes the appropriate symbol(s) for narrowing aliases of a
|
|
function f of type FLOAT.
|
|
|
|
SET_NAN_PAYLOAD(flt, mant)
|
|
Set the NaN payload bits of the variable FLT of type FLOAT to
|
|
the mantissa MANT. */
|
|
|
|
#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
|
|
#ifndef declare_mgen_alias_narrow
|
|
# error "declare_mgen_alias_narrow must be defined."
|
|
#endif
|
|
#ifndef SET_NAN_PAYLOAD
|
|
# error "SET_NAN_PAYLOAD must be defined."
|
|
#endif
|
|
|
|
#ifndef declare_mgen_finite_alias_x
|
|
#define declare_mgen_finite_alias_x(from, to) \
|
|
libm_alias_finite (from, to)
|
|
#endif
|
|
|
|
#ifndef declare_mgen_finite_alias_s
|
|
# define declare_mgen_finite_alias_s(from,to) \
|
|
declare_mgen_finite_alias_x (from, to)
|
|
#endif
|
|
|
|
#ifndef declare_mgen_finite_alias
|
|
# define declare_mgen_finite_alias(from, to) \
|
|
declare_mgen_finite_alias_s (M_SUF (from), M_SUF (to))
|
|
#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 (sqrt)
|
|
|
|
/* Needed to evaluate M_MANT_DIG below. */
|
|
#include <float.h>
|
|
#include <libm-alias-finite.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 */
|