X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Flog2l.c;h=722b451a026ae2ccd1b70381c4a87b7936ddb3c2;hb=5b5db97f7e80bde2678aed72336a28375e800354;hp=76a7aacd9d6e46a0f8f8ffbf8eb9fc51b6373d46;hpb=37aa7f7301d6526c14635375886acd881b471f6c;p=musl diff --git a/src/math/log2l.c b/src/math/log2l.c index 76a7aacd..722b451a 100644 --- a/src/math/log2l.c +++ b/src/math/log2l.c @@ -108,8 +108,7 @@ static const long double S[4] = { long double log2l(long double x) { - long double z; - long double y; + long double y, z; int e; if (isnan(x)) @@ -118,7 +117,7 @@ long double log2l(long double x) return x; if (x <= 0.0) { if (x == 0.0) - return -1/(x+0); /* -inf with divbyzero */ + return -1/(x*x); /* -inf with divbyzero */ return 0/0.0f; /* nan with invalid */ } @@ -174,4 +173,10 @@ done: z += e; return z; } +#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384 +// TODO: broken implementation to make things compile +long double log2l(long double x) +{ + return log2(x); +} #endif