/* * wrapper exp2l(x) */ #include <float.h> #include "math.h" #include "math_private.h" static const long double o_threshold = (long double) LDBL_MAX_EXP; static const long double u_threshold = (long double) LDBL_MIN_EXP; long double __exp2l (long double x) /* wrapper exp2l */ { #ifdef _IEEE_LIBM return __ieee754_exp2l (x); #else long double z; z = __ieee754_exp2l (x); if (_LIB_VERSION != _IEEE_ && __finitel (x)) { if (x > o_threshold) return __kernel_standard (x, x, 244); /* exp2l overflow */ else if (x < u_threshold) return __kernel_standard (x, x, 245); /* exp2l underflow */ } return z; #endif } weak_alias (__exp2l, exp2l)