diff options
| author | Wilco Dijkstra <wdijkstr@arm.com> | 2015-09-18 20:51:52 +0100 |
|---|---|---|
| committer | Wilco Dijkstra <wdijkstr@arm.com> | 2015-09-18 20:51:52 +0100 |
| commit | fe8c2b33aed067282ecac0cc3fdff1feef88548b (patch) | |
| tree | 71aad7a4af771bfa194fd13b83d2af62a9ae9051 | |
| parent | 6565fcb6e189d67b5a3f321453daebb805056d73 (diff) | |
| download | glibc-fe8c2b33aed067282ecac0cc3fdff1feef88548b.tar.xz glibc-fe8c2b33aed067282ecac0cc3fdff1feef88548b.zip | |
Since we now inline isinf, isnan and isfinite in math.h, replace uses of __isinf_ns(l/f)
with isinf, and remove the unused inlines __isinf_ns(l/f), __isnan(f) and __finite(f).
2015-09-18 Wilco Dijkstra <wdijkstr@arm.com>
* include/math.h: Remove __isinf_ns, __isinf_nsf, __isinf_nsl.
* math/Makefile: Remove isinf_ns.c.
* math/divtc3.c (__divtc3): Replace __isinf_nsl with isinf.
* math/multc3.c (__multc3): Likewise.
* math/s_casin.c (__casin): Likewise.
* math/s_casinf.c (__casinf): Likewise.
* math/s_casinl.c (__casinl): Likewise.
* math/s_cproj.c (__cproj): Likewise.
* math/s_cprojf.c (__cprojf): Likewise.
* math/s_cprojl.c (__cprofl): Likewise.
* math/s_ctan.c (__ctan): Likewise.
* math/s_ctanf.c (__ctanf): Likewise.
* math/s_ctanh.c (__ctanh): Likewise.
* math/s_ctanhf.c (__ctanhf): Likewise.
* math/s_ctanhl.c (__ctanhl): Likewise.
* math/s_ctanl.c (__ctanl): Likewise.
* math/w_fmod.c (__fmod): Likewise.
* math/w_fmodf.c (__fmodf): Likewise.
* math/w_fmodl.c (_fmodl): Likewise.
* math/w_remainder.c (__remainder): Likewise.
* math/w_remainderf.c (__remainderf): Likewise.
* math/w_remainderl.c (__remainderl): Likewise.
* math/w_scalb.c (__scalb): Likewise.
* math/w_scalbf.c (__scalbf): Likewise.
* math/w_scalbl.c (__scalbl): Likewise.
* sysdeps/ieee754/dbl-64/s_isinf_ns.c: Deleted file.
* sysdeps/ieee754/dbl-64/s_sincos.c (__sincos): Replace __isinf_ns
with isinf.
* sysdeps/ieee754/dbl-64/wordsize-64/math_private.h: Deleted file.
* sysdeps/ieee754/dbl-64/wordsize-64/s_isinf_ns.c: Deleted file.
* sysdeps/ieee754/flt-32/e_exp2f.c (__ieee754_exp2f): Replace
__isinf_nsf with isinf.
* sysdeps/ieee754/flt-32/math_private.h: Deleted file.
* sysdeps/ieee754/flt-32/s_isinf_nsf.c: Deleted file.
* sysdeps/ieee754/ldbl-128/s_isinf_nsl.c: Deleted file.
* sysdeps/ieee754/ldbl-128/s_sincosl.c (__sincosl): Replace __isinf_nsl
with isinf.
* sysdeps/ieee754/ldbl-128ibm/s_cprojl.c(__cprojll): Replace
__isinf_nsl with isinf.
* sysdeps/ieee754/ldbl-128ibm/s_ctanl.c(__ctanl): Replace __isinf_nsl
with isinf.
* sysdeps/ieee754/ldbl-128ibm/s_isinf_nsl.c: Deleted file.
* sysdeps/ieee754/ldbl-128ibm/s_sincosl.c (__sincosl): Replace
__isinf_nsl with isinf.
* sysdeps/ieee754/ldbl-96/s_isinf_nsl.c: Deleted file.
* sysdeps/ieee754/ldbl-96/s_sincosl.c (__sincosl): Replace __isinf_nsl
with isinf.
39 files changed, 103 insertions, 248 deletions
@@ -1,5 +1,55 @@ 2015-09-18 Wilco Dijkstra <wdijkstr@arm.com> + * include/math.h: Remove __isinf_ns, __isinf_nsf, __isinf_nsl. + * math/Makefile: Remove isinf_ns.c. + * math/divtc3.c (__divtc3): Replace __isinf_nsl with isinf. + * math/multc3.c (__multc3): Likewise. + * math/s_casin.c (__casin): Likewise. + * math/s_casinf.c (__casinf): Likewise. + * math/s_casinl.c (__casinl): Likewise. + * math/s_cproj.c (__cproj): Likewise. + * math/s_cprojf.c (__cprojf): Likewise. + * math/s_cprojl.c (__cprofl): Likewise. + * math/s_ctan.c (__ctan): Likewise. + * math/s_ctanf.c (__ctanf): Likewise. + * math/s_ctanh.c (__ctanh): Likewise. + * math/s_ctanhf.c (__ctanhf): Likewise. + * math/s_ctanhl.c (__ctanhl): Likewise. + * math/s_ctanl.c (__ctanl): Likewise. + * math/w_fmod.c (__fmod): Likewise. + * math/w_fmodf.c (__fmodf): Likewise. + * math/w_fmodl.c (_fmodl): Likewise. + * math/w_remainder.c (__remainder): Likewise. + * math/w_remainderf.c (__remainderf): Likewise. + * math/w_remainderl.c (__remainderl): Likewise. + * math/w_scalb.c (__scalb): Likewise. + * math/w_scalbf.c (__scalbf): Likewise. + * math/w_scalbl.c (__scalbl): Likewise. + * sysdeps/ieee754/dbl-64/s_isinf_ns.c: Deleted file. + * sysdeps/ieee754/dbl-64/s_sincos.c (__sincos): Replace __isinf_ns + with isinf. + * sysdeps/ieee754/dbl-64/wordsize-64/math_private.h: Deleted file. + * sysdeps/ieee754/dbl-64/wordsize-64/s_isinf_ns.c: Deleted file. + * sysdeps/ieee754/flt-32/e_exp2f.c (__ieee754_exp2f): Replace + __isinf_nsf with isinf. + * sysdeps/ieee754/flt-32/math_private.h: Deleted file. + * sysdeps/ieee754/flt-32/s_isinf_nsf.c: Deleted file. + * sysdeps/ieee754/ldbl-128/s_isinf_nsl.c: Deleted file. + * sysdeps/ieee754/ldbl-128/s_sincosl.c (__sincosl): Replace __isinf_nsl + with isinf. + * sysdeps/ieee754/ldbl-128ibm/s_cprojl.c(__cprojll): Replace + __isinf_nsl with isinf. + * sysdeps/ieee754/ldbl-128ibm/s_ctanl.c(__ctanl): Replace __isinf_nsl + with isinf. + * sysdeps/ieee754/ldbl-128ibm/s_isinf_nsl.c: Deleted file. + * sysdeps/ieee754/ldbl-128ibm/s_sincosl.c (__sincosl): Replace + __isinf_nsl with isinf. + * sysdeps/ieee754/ldbl-96/s_isinf_nsl.c: Deleted file. + * sysdeps/ieee754/ldbl-96/s_sincosl.c (__sincosl): Replace __isinf_nsl + with isinf. + +2015-09-18 Wilco Dijkstra <wdijkstr@arm.com> + * resolv/base64.c (rcsid): Remove unused static. * sysdeps/ieee754/dbl-64/atnat2.h (qpi1): Remove unused static. (tqpi1): Likewise. diff --git a/include/math.h b/include/math.h index 42bb55eb98..b28c4412e2 100644 --- a/include/math.h +++ b/include/math.h @@ -35,9 +35,5 @@ libm_hidden_proto (__expl) libm_hidden_proto (__expm1l) # endif -extern int __isinf_ns (double); -extern int __isinf_nsf (float); -extern int __isinf_nsl (long double); - #endif #endif diff --git a/math/Makefile b/math/Makefile index 2e5291a378..8a2620919f 100644 --- a/math/Makefile +++ b/math/Makefile @@ -61,7 +61,7 @@ libm-calls = e_acos e_acosh e_asin e_atan2 e_atanh e_cosh e_exp e_fmod \ 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_isinf_ns s_issignaling $(calls:s_%=m_%) x2y2m1 k_casinh \ + s_issignaling $(calls:s_%=m_%) x2y2m1 k_casinh \ gamma_product k_standard lgamma_neg lgamma_product dbl-only-routines := branred doasin dosincos halfulp mpa mpatan2 \ diff --git a/math/divtc3.c b/math/divtc3.c index bfd9b3f14d..c0dee8e3a9 100644 --- a/math/divtc3.c +++ b/math/divtc3.c @@ -54,19 +54,19 @@ __divtc3 (long double a, long double b, long double c, long double d) x = __copysignl (INFINITY, c) * a; y = __copysignl (INFINITY, c) * b; } - else if ((__isinf_nsl (a) || __isinf_nsl (b)) + else if ((isinf (a) || isinf (b)) && isfinite (c) && isfinite (d)) { - a = __copysignl (__isinf_nsl (a) ? 1 : 0, a); - b = __copysignl (__isinf_nsl (b) ? 1 : 0, b); + a = __copysignl (isinf (a) ? 1 : 0, a); + b = __copysignl (isinf (b) ? 1 : 0, b); x = INFINITY * (a * c + b * d); y = INFINITY * (b * c - a * d); } - else if ((__isinf_nsl (c) || __isinf_nsl (d)) + else if ((isinf (c) || isinf (d)) && isfinite (a) && isfinite (b)) { - c = __copysignl (__isinf_nsl (c) ? 1 : 0, c); - d = __copysignl (__isinf_nsl (d) ? 1 : 0, d); + c = __copysignl (isinf (c) ? 1 : 0, c); + d = __copysignl (isinf (d) ? 1 : 0, d); x = 0.0 * (a * c + b * d); y = 0.0 * (b * c - a * d); } diff --git a/math/multc3.c b/math/multc3.c index 1dbb59a8bb..2fd165d1f0 100644 --- a/math/multc3.c +++ b/math/multc3.c @@ -38,29 +38,29 @@ __multc3 (long double a, long double b, long double c, long double d) { /* Recover infinities that computed as NaN + iNaN. */ bool recalc = 0; - if (__isinf_nsl (a) || __isinf_nsl (b)) + if (isinf (a) || isinf (b)) { /* z is infinite. "Box" the infinity and change NaNs in the other factor to 0. */ - a = __copysignl (__isinf_nsl (a) ? 1 : 0, a); - b = __copysignl (__isinf_nsl (b) ? 1 : 0, b); + a = __copysignl (isinf (a) ? 1 : 0, a); + b = __copysignl (isinf (b) ? 1 : 0, b); if (isnan (c)) c = __copysignl (0, c); if (isnan (d)) d = __copysignl (0, d); recalc = 1; } - if (__isinf_nsl (c) || __isinf_nsl (d)) + if (isinf (c) || isinf (d)) { /* w is infinite. "Box" the infinity and change NaNs in the other factor to 0. */ - c = __copysignl (__isinf_nsl (c) ? 1 : 0, c); - d = __copysignl (__isinf_nsl (d) ? 1 : 0, d); + c = __copysignl (isinf (c) ? 1 : 0, c); + d = __copysignl (isinf (d) ? 1 : 0, d); if (isnan (a)) a = __copysignl (0, a); if (isnan (b)) b = __copysignl (0, b); recalc = 1; } if (!recalc - && (__isinf_nsl (ac) || __isinf_nsl (bd) - || __isinf_nsl (ad) || __isinf_nsl (bc))) + && (isinf (ac) || isinf (bd) + || isinf (ad) || isinf (bc))) { /* Recover infinities from overflow by changing NaNs to 0. */ if (isnan (a)) a = __copysignl (0, a); diff --git a/math/s_casin.c b/math/s_casin.c index 206f1d2163..826fd38e52 100644 --- a/math/s_casin.c +++ b/math/s_casin.c @@ -33,7 +33,7 @@ __casin (__complex__ double x) { res = x; } - else if (__isinf_ns (__real__ x) || __isinf_ns (__imag__ x)) + else if (isinf (__real__ x) || isinf (__imag__ x)) { __real__ res = __nan (""); __imag__ res = __copysign (HUGE_VAL, __imag__ x); diff --git a/math/s_casinf.c b/math/s_casinf.c index 65cba20b82..9b3d2f1ce5 100644 --- a/math/s_casinf.c +++ b/math/s_casinf.c @@ -33,7 +33,7 @@ __casinf (__complex__ float x) { res = x; } - else if (__isinf_nsf (__real__ x) || __isinf_nsf (__imag__ x)) + else if (isinf (__real__ x) || isinf (__imag__ x)) { __real__ res = __nanf (""); __imag__ res = __copysignf (HUGE_VALF, __imag__ x); diff --git a/math/s_casinl.c b/math/s_casinl.c index 2263a26b42..f7d85fc274 100644 --- a/math/s_casinl.c +++ b/math/s_casinl.c @@ -33,7 +33,7 @@ __casinl (__complex__ long double x) { res = x; } - else if (__isinf_nsl (__real__ x) || __isinf_nsl (__imag__ x)) + else if (isinf (__real__ x) || isinf (__imag__ x)) { __real__ res = __nanl (""); __imag__ res = __copysignl (HUGE_VALL, __imag__ x); diff --git a/math/s_cproj.c b/math/s_cproj.c index bf2cfc472d..42bf076334 100644 --- a/math/s_cproj.c +++ b/math/s_cproj.c @@ -25,7 +25,7 @@ __complex__ double __cproj (__complex__ double x) { - if (__isinf_ns (__real__ x) || __isinf_ns (__imag__ x)) + if (isinf (__real__ x) || isinf (__imag__ x)) { __complex__ double res; diff --git a/math/s_cprojf.c b/math/s_cprojf.c index 531d10e14f..93403721eb 100644 --- a/math/s_cprojf.c +++ b/math/s_cprojf.c @@ -25,7 +25,7 @@ __complex__ float __cprojf (__complex__ float x) { - if (__isinf_nsf (__real__ x) || __isinf_nsf (__imag__ x)) + if (isinf (__real__ x) || isinf (__imag__ x)) { __complex__ float res; diff --git a/math/s_cprojl.c b/math/s_cprojl.c index 32292a4a6d..de8831817a 100644 --- a/math/s_cprojl.c +++ b/math/s_cprojl.c @@ -25,7 +25,7 @@ __complex__ long double __cprojl (__complex__ long double x) { - if (__isinf_nsl (__real__ x) || __isinf_nsl (__imag__ x)) + if (isinf (__real__ x) || isinf (__imag__ x)) { __complex__ long double res; diff --git a/math/s_ctan.c b/math/s_ctan.c index 7ed6abd814..674c3b63b4 100644 --- a/math/s_ctan.c +++ b/math/s_ctan.c @@ -30,7 +30,7 @@ __ctan (__complex__ double x) if (__glibc_unlikely (!isfinite (__real__ x) || !isfinite (__imag__ x))) { - if (__isinf_ns (__imag__ x)) + if (isinf (__imag__ x)) { if (isfinite (__real__ x) && fabs (__real__ x) > 1.0) { @@ -51,7 +51,7 @@ __ctan (__complex__ double x) __real__ res = __nan (""); __imag__ res = __nan (""); - if (__isinf_ns (__real__ x)) + if (isinf (__real__ x)) feraiseexcept (FE_INVALID); } } diff --git a/math/s_ctanf.c b/math/s_ctanf.c index d87f775f23..e0ebe43d31 100644 --- a/math/s_ctanf.c +++ b/math/s_ctanf.c @@ -30,7 +30,7 @@ __ctanf (__complex__ float x) if (__glibc_unlikely (!isfinite (__real__ x) || !isfinite (__imag__ x))) { - if (__isinf_nsf (__imag__ x)) + if (isinf (__imag__ x)) { if (isfinite (__real__ x) && fabsf (__real__ x) > 1.0f) { @@ -51,7 +51,7 @@ __ctanf (__complex__ float x) __real__ res = __nanf (""); __imag__ res = __nanf (""); - if (__isinf_nsf (__real__ x)) + if (isinf (__real__ x)) feraiseexcept (FE_INVALID); } } diff --git a/math/s_ctanh.c b/math/s_ctanh.c index a41cd1a0a6..58607b1367 100644 --- a/math/s_ctanh.c +++ b/math/s_ctanh.c @@ -30,7 +30,7 @@ __ctanh (__complex__ double x) if (__glibc_unlikely (!isfinite (__real__ x) || !isfinite (__imag__ x))) { - if (__isinf_ns (__real__ x)) + if (isinf (__real__ x)) { __real__ res = __copysign (1.0, __real__ x); if (isfinite (__imag__ x) && fabs (__imag__ x) > 1.0) @@ -51,7 +51,7 @@ __ctanh (__complex__ double x) __real__ res = __nan (""); __imag__ res = __nan (""); - if (__isinf_ns (__imag__ x)) + if (isinf (__imag__ x)) feraiseexcept (FE_INVALID); } } diff --git a/math/s_ctanhf.c b/math/s_ctanhf.c index 3ce8ac1ac4..a4fd2301cd 100644 --- a/math/s_ctanhf.c +++ b/math/s_ctanhf.c @@ -30,7 +30,7 @@ __ctanhf (__complex__ float x) if (__glibc_unlikely (!isfinite (__real__ x) || !isfinite (__imag__ x))) { - if (__isinf_nsf (__real__ x)) + if (isinf (__real__ x)) { __real__ res = __copysignf (1.0, __real__ x); if (isfinite (__imag__ x) && fabsf (__imag__ x) > 1.0f) @@ -51,7 +51,7 @@ __ctanhf (__complex__ float x) __real__ res = __nanf (""); __imag__ res = __nanf (""); - if (__isinf_nsf (__imag__ x)) + if (isinf (__imag__ x)) feraiseexcept (FE_INVALID); } } diff --git a/math/s_ctanhl.c b/math/s_ctanhl.c index 2fc54a85d0..fb67b2bcc8 100644 --- a/math/s_ctanhl.c +++ b/math/s_ctanhl.c @@ -37,7 +37,7 @@ __ctanhl (__complex__ long double x) if (__glibc_unlikely (!isfinite (__real__ x) || !isfinite (__imag__ x))) { - if (__isinf_nsl (__real__ x)) + if (isinf (__real__ x)) { __real__ res = __copysignl (1.0, __real__ x); if (isfinite (__imag__ x) && fabsl (__imag__ x) > 1.0L) @@ -58,7 +58,7 @@ __ctanhl (__complex__ long double x) __real__ res = __nanl (""); __imag__ res = __nanl (""); - if (__isinf_nsl (__imag__ x)) + if (isinf (__imag__ x)) feraiseexcept (FE_INVALID); } } diff --git a/math/s_ctanl.c b/math/s_cta |
