diff options
| author | Szabolcs Nagy <nsz@port70.net> | 2014-09-08 15:51:42 +0200 |
|---|---|---|
| committer | Szabolcs Nagy <nsz@port70.net> | 2014-09-08 15:51:42 +0200 |
| commit | 0c32c2635eedfcd6af3606735ac38197f8705734 (patch) | |
| tree | eb11e1e4c69a980133a5d61c4e19c0b5684ad548 /src/math | |
| parent | 976bb28fa0f5b6d82055502c27444ac5c9bf34ed (diff) | |
| download | musl-0c32c2635eedfcd6af3606735ac38197f8705734.tar.gz | |
prune math code on archs with binary64 long double
__polevll, __p1evll and exp10l were provided on archs when long double
is the same as double. The first two were completely unused and exp10l
can be a wrapper around exp10.
Diffstat (limited to 'src/math')
| -rw-r--r-- | src/math/__polevll.c | 3 | ||||
| -rw-r--r-- | src/math/exp10l.c | 7 |
2 files changed, 10 insertions, 0 deletions
diff --git a/src/math/__polevll.c b/src/math/__polevll.c index a2728651..ce1a8404 100644 --- a/src/math/__polevll.c +++ b/src/math/__polevll.c @@ -56,6 +56,8 @@ #include "libm.h" +#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024 +#else /* * Polynomial evaluator: * P[0] x^n + P[1] x^(n-1) + ... + P[n] @@ -88,3 +90,4 @@ long double __p1evll(long double x, const long double *P, int n) return y; } +#endif diff --git a/src/math/exp10l.c b/src/math/exp10l.c index 22a4636a..33abc8b5 100644 --- a/src/math/exp10l.c +++ b/src/math/exp10l.c @@ -2,6 +2,12 @@ #include <math.h> #include "libc.h" +#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024 +long double exp10l(long double x) +{ + return exp10(x); +} +#else long double exp10l(long double x) { static const long double p10[] = { @@ -18,5 +24,6 @@ long double exp10l(long double x) } return powl(10.0, x); } +#endif weak_alias(exp10l, pow10l); |