mirror of https://git.musl-libc.org/git/musl
math: raise flags in logl.c on <= 0 arguments
This commit is contained in:
parent
52bcf3f5fb
commit
e2fe959fe2
|
@ -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))
|
||||
|
|
|
@ -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"
|
||||
|
@ -121,8 +116,8 @@ long double logl(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 */
|
||||
|
|
Loading…
Reference in New Issue