diff options
| author | Waldemar Brodkorb <wbx@openadk.org> | 2016-02-14 03:55:33 +0100 |
|---|---|---|
| committer | Waldemar Brodkorb <wbx@openadk.org> | 2016-02-19 19:25:47 +0100 |
| commit | abfbe76cb5adff2e7c9ddd4dc10c3dcc641d8949 (patch) | |
| tree | ffd280132ba5cd871c17b6d5ceae239e60de9932 /libm/e_lgamma_r.c | |
| parent | 337531c6d5d2b3f04711933ac12432c1fa3f3254 (diff) | |
libm: remove dead code
_IEEE_LIBM is always defined, so the other code is never
used. I don't know when it was actively used.
Diffstat (limited to 'libm/e_lgamma_r.c')
| -rw-r--r-- | libm/e_lgamma_r.c | 41 |
1 files changed, 0 insertions, 41 deletions
diff --git a/libm/e_lgamma_r.c b/libm/e_lgamma_r.c index c91166a19..82005ea17 100644 --- a/libm/e_lgamma_r.c +++ b/libm/e_lgamma_r.c @@ -295,25 +295,7 @@ double __ieee754_lgamma_r(double x, int *signgamp) return r; } -/* - * wrapper double lgamma_r(double x, int *signgamp) - */ -#ifndef _IEEE_LIBM -double lgamma_r(double x, int *signgamp) -{ - double y = __ieee754_lgamma_r(x, signgamp); - if (_LIB_VERSION == _IEEE_) - return y; - if (!isfinite(y) && isfinite(x)) { - if (floor(x) == x && x <= 0.0) - return __kernel_standard(x, x, 15); /* lgamma pole */ - return __kernel_standard(x, x, 14); /* lgamma overflow */ - } - return y; -} -#else strong_alias(__ieee754_lgamma_r, lgamma_r) -#endif libm_hidden_def(lgamma_r) /* __ieee754_lgamma(x) @@ -324,25 +306,7 @@ double __ieee754_lgamma(double x) return __ieee754_lgamma_r(x, &signgam); } -/* - * wrapper double lgamma(double x) - */ -#ifndef _IEEE_LIBM -double lgamma(double x) -{ - double y = __ieee754_lgamma_r(x, &signgam); - if (_LIB_VERSION == _IEEE_) - return y; - if (!isfinite(y) && isfinite(x)) { - if (floor(x) == x && x <= 0.0) - return __kernel_standard(x, x, 15); /* lgamma pole */ - return __kernel_standard(x, x, 14); /* lgamma overflow */ - } - return y; -} -#else strong_alias(__ieee754_lgamma, lgamma); -#endif libm_hidden_def(lgamma) @@ -352,13 +316,8 @@ libm_hidden_def(lgamma) * not a ln(|Gamma(x)|) but just Gamma(x), but standards * introduced tgamma name for that. */ -#ifndef _IEEE_LIBM -strong_alias(lgamma_r, gamma_r) -strong_alias(lgamma, gamma) -#else strong_alias(__ieee754_lgamma_r, gamma_r) strong_alias(__ieee754_lgamma, gamma) -#endif libm_hidden_def(gamma) |