diff options
| author | Rich Felker <dalias@aerifal.cx> | 2012-11-15 08:37:58 -0500 |
|---|---|---|
| committer | Rich Felker <dalias@aerifal.cx> | 2012-11-15 08:37:58 -0500 |
| commit | 8bb181622222f2ee3462c8b021bcae4fcdbbd37a (patch) | |
| tree | 166a1be834c8cd5a4c2521d41d7ee506bd8c8e51 /src/math/log2l.c | |
| parent | 22781b4d8ecaf97ac52d2a501a2e7d3bc1920ce0 (diff) | |
| parent | 68847ecd3a644d3ffd9be58603be1a3fa437dff0 (diff) | |
| download | musl-8bb181622222f2ee3462c8b021bcae4fcdbbd37a.tar.gz musl-8bb181622222f2ee3462c8b021bcae4fcdbbd37a.tar.xz musl-8bb181622222f2ee3462c8b021bcae4fcdbbd37a.zip | |
Merge remote-tracking branch 'nsz/math'
Diffstat (limited to 'src/math/log2l.c')
| -rw-r--r-- | src/math/log2l.c | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/src/math/log2l.c b/src/math/log2l.c index 8ebce9c4..345b395d 100644 --- a/src/math/log2l.c +++ b/src/math/log2l.c @@ -50,11 +50,6 @@ * In the tests over the interval exp(+-10000), the logarithms * of the random arguments were uniformly distributed over * [-10000, +10000]. - * - * ERROR MESSAGES: - * - * log singularity: x = 0; returns -INFINITY - * log domain: x < 0; returns NAN */ #include "libm.h" @@ -113,8 +108,7 @@ static const long double S[4] = { long double log2l(long double x) { - volatile long double z; - long double y; + long double y, z; int e; if (isnan(x)) @@ -123,8 +117,8 @@ long double log2l(long double x) return x; if (x <= 0.0) { if (x == 0.0) - return -INFINITY; - return NAN; + return -1/(x+0); /* -inf with divbyzero */ + return 0/0.0f; /* nan with invalid */ } /* separate mantissa from exponent */ |