/* * wrapper log2l(X) */ #include <math.h> #include "math_private.h" long double __log2l (long double x) /* wrapper log2l */ { #ifdef _IEEE_LIBM return __ieee754_log2l (x); #else long double z; z = __ieee754_log2l (x); if (_LIB_VERSION == _IEEE_ || __isnanl (x)) return z; if (x <= 0.0) { if (x == 0.0) return __kernel_standard (x, x, 248); /* log2l (0) */ else return __kernel_standard (x, x, 249); /* log2l (x < 0) */ } else return z; #endif } weak_alias (__log2l, log2l)