mirror of git://git.musl-libc.org/musl
math: fix logb*.c exceptions now that ilogb raises invalid
This commit is contained in:
parent
37aa7f7301
commit
52bcf3f5fb
|
@ -1,20 +1,17 @@
|
|||
#include <limits.h>
|
||||
#include "libm.h"
|
||||
|
||||
/*
|
||||
special cases:
|
||||
logb(+-0) = -inf
|
||||
logb(+-0) = -inf, and raise divbyzero
|
||||
logb(+-inf) = +inf
|
||||
logb(nan) = nan
|
||||
these are calculated at runtime to raise fp exceptions
|
||||
*/
|
||||
|
||||
double logb(double x) {
|
||||
int i = ilogb(x);
|
||||
|
||||
if (i == FP_ILOGB0)
|
||||
return -1.0/fabs(x);
|
||||
if (i == FP_ILOGBNAN || i == INT_MAX)
|
||||
double logb(double x)
|
||||
{
|
||||
if (!isfinite(x))
|
||||
return x * x;
|
||||
return i;
|
||||
if (x == 0)
|
||||
return -1/(x+0);
|
||||
return ilogb(x);
|
||||
}
|
||||
|
|
|
@ -1,12 +1,10 @@
|
|||
#include <limits.h>
|
||||
#include "libm.h"
|
||||
|
||||
float logbf(float x) {
|
||||
int i = ilogbf(x);
|
||||
|
||||
if (i == FP_ILOGB0)
|
||||
return -1.0f/fabsf(x);
|
||||
if (i == FP_ILOGBNAN || i == INT_MAX)
|
||||
float logbf(float x)
|
||||
{
|
||||
if (!isfinite(x))
|
||||
return x * x;
|
||||
return i;
|
||||
if (x == 0)
|
||||
return -1/(x+0);
|
||||
return ilogbf(x);
|
||||
}
|
||||
|
|
|
@ -1,4 +1,3 @@
|
|||
#include <limits.h>
|
||||
#include "libm.h"
|
||||
#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
|
||||
long double logbl(long double x)
|
||||
|
@ -8,12 +7,10 @@ long double logbl(long double x)
|
|||
#else
|
||||
long double logbl(long double x)
|
||||
{
|
||||
int i = ilogbl(x);
|
||||
|
||||
if (i == FP_ILOGB0)
|
||||
return -1.0/fabsl(x);
|
||||
if (i == FP_ILOGBNAN || i == INT_MAX)
|
||||
if (!isfinite(x))
|
||||
return x * x;
|
||||
return i;
|
||||
if (x == 0)
|
||||
return -1/(x+0);
|
||||
return ilogbl(x);
|
||||
}
|
||||
#endif
|
||||
|
|
Loading…
Reference in New Issue