17 lines
318 B
C
17 lines
318 B
C
#include "headers/log10d2.h"
|
|
#include "headers/dom_chkd_less_than.h"
|
|
|
|
static __inline double _log10(double x)
|
|
{
|
|
double res;
|
|
vector double vx;
|
|
vector double vc = { 0.0, 0.0 };
|
|
|
|
vx = spu_promote(x, 0);
|
|
res = spu_extract(_log10d2(vx), 0);
|
|
#ifndef _IEEE_LIBM
|
|
dom_chkd_less_than(vx, vc);
|
|
#endif
|
|
return res;
|
|
}
|