X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Fmath%2Flog2l.c;h=76a7aacd9d6e46a0f8f8ffbf8eb9fc51b6373d46;hp=8ebce9c43be4b09a6010762bbc510866cd26a19c;hb=37aa7f7301d6526c14635375886acd881b471f6c;hpb=04ccbdca6d88738e23e0d6a622ad33854c468646 diff --git a/src/math/log2l.c b/src/math/log2l.c index 8ebce9c4..76a7aacd 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,7 +108,7 @@ static const long double S[4] = { long double log2l(long double x) { - volatile long double z; + long double z; long double y; int e; @@ -123,8 +118,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 */