about summary refs log tree commit diff stats
path: root/src/wrapped/wrappedlibm_private.h
diff options
context:
space:
mode:
Diffstat (limited to 'src/wrapped/wrappedlibm_private.h')
-rw-r--r--src/wrapped/wrappedlibm_private.h303
1 files changed, 54 insertions, 249 deletions
diff --git a/src/wrapped/wrappedlibm_private.h b/src/wrapped/wrappedlibm_private.h
index 2849d57d..6f12f62c 100644
--- a/src/wrapped/wrappedlibm_private.h
+++ b/src/wrapped/wrappedlibm_private.h
@@ -10,61 +10,32 @@ GOW(acosh, dFd)
 GOW(acoshf, fFf)
 GOM(__acoshf_finite, fFf)
 GOM(__acosh_finite, dFd)
-#ifdef HAVE_LD80BITS
-GOW(acoshl, DFD)
-#else
-GO2(acoshl, KFK, acosh)
-#endif
-#ifdef HAVE_LD80BITS
-GOW(acosl, DFD)
-#else
-GO2(acosl, KFK, acos)
-#endif
+GODW(acoshl, DFD, acosh)
+GODW(acosl, DFD, acos)
 GOW(asin, dFd)
 GOW(asinf, fFf)
 GOM(__asinf_finite, fFf)
 GOM(__asin_finite, dFd)
 GOW(asinh, dFd)
 GOW(asinhf, fFf)
-#ifdef HAVE_LD80BITS
-GOW(asinhl, DFD)
-#else
-GO2(asinhl, KFK, asinh)
-#endif
-#ifdef HAVE_LD80BITS
-GOW(asinl, DFD)
-#else
-GO2(asinl, KFK, asin)
-#endif
+GODW(asinhl, DFD, asinh)
+GODW(asinl, DFD, asin)
 GO(atan, dFd)
 GOW(atan2, dFdd)
 GOW(atan2f, fFff)
 GOM(__atan2f_finite, fFff)
 GOM(__atan2_finite, dFdd)
-#ifdef HAVE_LD80BITS
-GOW(atan2l, lFDD)
-#else
-GO2(atan2l, lFKK, atan2)
-#endif
+GODW(atan2l, lFDD, atan2)
 GOW(atanf, fFf)
 GOW(atanh, dFd)
 GOW(atanhf, fFf)
 // __atanhf_finite
 // __atanh_finite
-#ifdef HAVE_LD80BITS
-GOW(atanhl, DFD)
-GOW(atanl, DFD)
-#else
-GO2(atanhl, KFK, atanh)
-GO2(atanl, KFK, atan)
-#endif
+GODW(atanhl, DFD, atanh)
+GODW(atanl, DFD, atan)
 GOW(cabs, XFX)
 GOW(cabsf, xFx)
-#ifdef HAVE_LD80BITS
-GOW(cabsl, DFY)
-#else
-GO2(cabsl, KFy, cabs)
-#endif
+GODW(cabsl, DFY, cabs)
 GOW(cacos, XFX)
 GOW(cacosf, xFx)
 GOW(cacosh, XFX)
@@ -88,36 +59,19 @@ GOW(catanhf, xFx)
 // catanl   // Weak
 GOW(cbrt, dFd)
 GOW(cbrtf, fFf)
-#ifdef HAVE_LD80BITS
-GOW(cbrtl, DFD)
-#else
-GO2(cbrtl, KFK, cbrt)
-#endif
+GODW(cbrtl, DFD, cbrt)
 GOW(ccos, XFX)
 GOW(ccosf, xFx)
 GOW(ccosh, XFX)
 GOW(ccoshf, xFx)
-#ifdef HAVE_LD80BITS
-GOW(ccoshl, YFY)
-GOW(ccosl, YFY)
-#else
-GO2(ccoshl, yFy, ccosh)
-GO2(ccosl, yFy, ccos)
-#endif
+GODW(ccoshl, YFY, ccosh)
+GODW(ccosl, YFY, ccos)
 GOW(ceil, dFd)
 GOW(ceilf, fFf)
-#ifdef HAVE_LD80BITS
-GOW(ceill, DFD)    // Weak
-#else
-GO2(ceill, KFK, ceil)
-#endif
+GODW(ceill, DFD, ceil)
 GOW(cexp, XFX)
 GOW(cexpf, xFx)
-#ifdef HAVE_LD80BITS
-GOW(cexpl, YFY)
-#else
-GO2(cexpl, yFy, cexp)
-#endif
+GODW(cexpl, YFY, cexp)
 // cimag    // Weak
 // cimagf   // Weak
 // cimagl   // Weak
@@ -129,11 +83,7 @@ GOW(clog, XFX)
 // clog10l  // Weak
 // __clog10l
 GOW(clogf, xFx)
-#ifdef HAVE_LD80BITS
-GOW(clogl, YFY)
-#else
-GO2(clogl, yFy, clog)
-#endif
+GODW(clogl, YFY, clog)
 // conj // Weak
 // conjf    // Weak
 // conjl    // Weak
@@ -146,20 +96,11 @@ GOW(cosh, dFd)
 GOW(coshf, fFf)
 GOM(__coshf_finite, fFf)
 GOM(__cosh_finite, dFd)
-#ifdef HAVE_LD80BITS
-GOW(coshl, DFD)
-GOW(cosl, DFD)
-#else
-GO2(coshl, KFK, cosh)
-GO2(cosl, KFK, cos)
-#endif
+GODW(coshl, DFD, cosh)
+GODW(cosl, DFD, cos)
 GOW(cpow, XFXX)
 GOW(cpowf, xFxx)
-#ifdef HAVE_LD80BITS
-GOW(cpowl, YFYY)
-#else
-GO2(cpowl, yFyy, cpow)
-#endif
+GODW(cpowl, YFYY, cpow)
 GOW(cproj, XFX)
 GOW(cprojf, xFx)
 // cprojl   // Weak
@@ -170,31 +111,17 @@ GOW(csin, XFX)
 GOW(csinf, xFx)
 GOW(csinh, XFX)
 GOW(csinhf, xFx)
-#ifdef HAVE_LD80BITS
-GOW(csinhl, YFY)
-GOW(csinl, YFY)
-#else
-GO2(csinhl, yFy, csinh)
-GO2(csinl, yFy, csin)
-#endif
+GODW(csinhl, YFY, csinh)
+GODW(csinl, YFY, csin)
 GOW(csqrt, XFX)
 GOW(csqrtf, xFx)
-#ifdef HAVE_LD80BITS
-GOW(csqrtl, YFY)
-#else
-GO2(csqrtl, yFy, csqrt)
-#endif
+GODW(csqrtl, YFY, csqrt)
 GOW(ctan, XFX)
 GOW(ctanf, xFx)
 GOW(ctanh, XFX)
 GOW(ctanhf, xFx)
-#ifdef HAVE_LD80BITS
-GOW(ctanhl, YFY)
-GOW(ctanl, YFY)
-#else
-GO2(ctanhl, yFy, ctanh)
-GO2(ctanl, yFy, ctan)
-#endif
+GODW(ctanhl, YFY, ctanh)
+GODW(ctanl, YFY, ctan)
 // __cxa_finalize  // Weak
 // drem // Weak
 // dremf    // Weak
@@ -202,17 +129,9 @@ GO2(ctanl, yFy, ctan)
 GOW(erf, dFd)
 GOW(erfc, dFd)
 GOW(erfcf, fFf)
-#ifdef HAVE_LD80BITS
-GOW(erfcl, DFD)
-#else
-GO2(erfcl, KFK, erfc)
-#endif
+GODW(erfcl, DFD, erfc)
 GOW(erff, fFf)
-#ifdef HAVE_LD80BITS
-GOW(erfl, DFD)
-#else
-GO2(erfl, KFK, erf)
-#endif
+GODW(erfl, DFD, erf)
 GOW(exp, dFd)
 GOW(exp10, dFd)
 GOW(exp10f, fFf)
@@ -223,26 +142,14 @@ GOW(exp2, dFd)
 GOW(exp2f, fFf)
 GOM(__exp2f_finite, fFf)
 GOM(__exp2_finite, dFd)
-#ifdef HAVE_LD80BITS
-GOW(exp2l, DFD)
-#else
-GO2(exp2l, KFK, exp2)
-#endif
+GODW(exp2l, DFD, exp2)
 GOW(expf, fFf)
 GOM(__expf_finite, fFf)
 GOM(__exp_finite, dFd)
-#ifdef HAVE_LD80BITS
-GOW(expl, DFD)
-#else
-GO2(expl, KFK, exp)
-#endif
+GODW(expl, DFD, exp)
 GOW(expm1, dFd)
 GOW(expm1f, fFf)
-#ifdef HAVE_LD80BITS
-GOW(expm1l, DFD)
-#else
-GO2(expm1l, KFK, expm1)
-#endif
+GODW(expm1l, DFD, expm1)
 GOW(fabs, dFd)
 GOW(fabsf, fFf)
 // fabsl    // Weak
@@ -271,18 +178,10 @@ GO(__finitef, iFf)
 // __finitel
 GOW(floor, dFd)
 GOW(floorf, fFf)
-#ifdef HAVE_LD80BITS
-GOW(floorl, DFD)
-#else
-GO2(floorl, KFK, floor)
-#endif
+GODW(floorl, DFD, floor)
 GOW(fma, dFddd)
 GOW(fmaf, fFfff)
-#ifdef HAVE_LD80BITS
-GOW(fmal, DFDDD)
-#else
-GO2(fmal, KFKKK, fma)
-#endif
+GODW(fmal, DFDDD, fma)
 GOW(fmax, dFdd)
 GOW(fmaxf, fFff)
 // fmaxl    // Weak
@@ -293,20 +192,12 @@ GOW(fmod, dFdd)
 GOW(fmodf, fFff)
 GOM(__fmodf_finite, fFff)
 GOM(__fmod_finite, dFdd)
-#ifdef HAVE_LD80BITS
-GOW(fmodl, DFDD)
-#else
-GO2(fmodl, KFKK, fmod)
-#endif
+GODW(fmodl, DFDD, fmod)
 GO(__fpclassify, iFd)
 GO(__fpclassifyf, iFf)
 GOW(frexp, dFdp)
 GOW(frexpf, fFfp)
-#ifdef HAVE_LD80BITS
-GOW(frexpl, DFDp)
-#else
-GO2(frexpl, KFKp, frexp)
-#endif
+GODW(frexpl, DFDp, frexp)
 // gamma    // Weak
 // gammaf   // Weak
 // __gammaf_r_finite
@@ -317,11 +208,7 @@ GOW(hypot, dFdd)
 GOW(hypotf, fFff)
 GOM(__hypotf_finite, fFff)
 GOM(__hypot_finite, dFdd)
-#ifdef HAVE_LD80BITS
-GOW(hypotl, DFDD)
-#else
-GO2(hypotl, KFKK, hypot)
-#endif
+GODW(hypotl, DFDD, hypot)
 GOW(ilogb, iFd)
 GOW(ilogbf, iFf)
 // ilogbl   // Weak
@@ -343,32 +230,16 @@ GO(jn, dFid)
 GO(jnf, fFif)
 // __jnf_finite
 // __jn_finite
-#ifdef HAVE_LD80BITS
-GO(jnl, DFiD)
-#else
-GO2(jnl, KFiK, jn)
-#endif
+GOD(jnl, DFiD, jn)
 GOW(ldexp, dFdi)
 GOW(ldexpf, fFfi)
-#ifdef HAVE_LD80BITS
-GOW(ldexpl, DFD)
-#else
-GO2(ldexpl, KFK, ldexp)
-#endif
+GODW(ldexpl, DFD, ldexp)
 GOW(lgamma, dFd)
 GOW(lgammaf, fFf)
 GOW(lgammaf_r, fFfp)
 // __lgammaf_r_finite
-#ifdef HAVE_LD80BITS
-GOW(lgammal, DFD)
-#else
-GO2(lgammal, KFK, lgamma)
-#endif
-#ifdef HAVE_LD80BITS
-GOW(lgammal_r, DFDp)
-#else
-GO2(lgammal_r, KFKp, lgamma_r)
-#endif
+GODW(lgammal, DFD, lgamma)
+GODW(lgammal_r, DFDp, lgamma_r)
 GOW(lgamma_r, dFdp)
 // __lgamma_r_finite
 #ifdef STATICBUILD
@@ -378,11 +249,7 @@ DATAV(_LIB_VERSION, 8)
 #endif
 GOWM(llrint, IFEd)
 GOWM(llrintf, IFEf)
-#ifdef HAVE_LD80BITS
 GOWM(llrintl, IFED)
-#else
-GOWM(llrintl, IFEK)
-#endif
 GOW(llround, IFd)
 GOW(llroundf, IFf)
 // llroundl // Weak
@@ -391,48 +258,28 @@ GOW(log10, dFd)
 GOW(log10f, fFf)
 GOM(__log10f_finite, fFf)
 GOM(__log10_finite, dFd)
-#ifdef HAVE_LD80BITS
-GOW(log10l, DFD)
-#else
-GO2(log10l, KFK, log10) //Weak
-#endif
+GODW(log10l, DFD, log10) //Weak
 GOW(log1p, dFd)
 GOW(log1pf, fFf)
-#ifdef HAVE_LD80BITS
-GOW(log1pl, DFD)
-#else
-GO2(log1pl, KFK, log1p)
-#endif
+GODW(log1pl, DFD, log1p)
 GOW(log2, dFd)
 GOW(log2f, fFf)
 GOM(__log2f_finite, fFf)
 GOM(__log2_finite, dFd)
-#ifdef HAVE_LD80BITS
-GOW(log2l, DFD)
-#else
-GO2(log2l, KFK, log2)
-#endif
+GODW(log2l, DFD, log2)
 GOW(logb, dFd)
 GOW(logbf, fFf)
 // logbl    // Weak
 GOW(logf, fFf)
 GOM(__logf_finite, fFf)
 GOM(__log_finite, dFd)
-#ifdef HAVE_LD80BITS
-GOW(logl, DFD)
-#else
-GO2(logl, KFK, log)
-#endif
+GODW(logl, DFD, log)
 GOWM(lrint, iFEd)
 GOWM(lrintf, iFEf)
 // lrintl   // Weak
 GOW(lround, iFd)
 GOW(lroundf, iFf)
-#ifdef HAVE_LD80BITS
-GOW(lroundl, lFD)
-#else
-GO2(lroundl, lFK, lround)
-#endif
+GODW(lroundl, lFD, lround)
 // matherr  // Weak
 GOW(modf, dFdp)
 GOW(modff, fFfp)
@@ -445,30 +292,18 @@ GOWM(nearbyintf, fFEf)
 // nearbyintl   // Weak
 GOW(nextafter, dFdd)
 GOW(nextafterf, fFff)
-#ifdef HAVE_LD80BITS
-GOW(nextafterl, DFDD)
-#else
-GO2(nextafterl, KFKK, nextafter)
-#endif
-GOW(nexttoward, dFdD)
-GOW(nexttowardf, fFfD)
+GODW(nextafterl, DFDD, nextafter)
+GODW(nexttoward, dFdD, my_nexttoward) // This loses precision
+GODW(nexttowardf, fFfD, my_nexttowardf) // This loses precision
 // nexttowardl  // Weak
 GOW(pow, dFdd)
 GOWM(pow10, dFd)
 GOWM(pow10f, fFf)
-#ifdef HAVE_LD80BITS
 GOWM(pow10l, DFD)
-#else
-GOWM(pow10l, KFK)
-#endif
 GOW(powf, fFff)
 GOM(__powf_finite, fFff)
 GOM(__pow_finite, dFdd)
-#ifdef HAVE_LD80BITS
-GOW(powl, DFDD)
-#else
-GO2(powl, KFKK, pow)
-#endif
+GODW(powl, DFDD, pow)
 GOW(remainder, dFdd)
 GOW(remainderf, fFff)
 // __remainderf_finite
@@ -485,11 +320,7 @@ GOW(roundf, fFf)
 GO(roundeven, dFd)  //since C23
 GO(roundevenf, fFf)
 //GO(roundevenl, DFD)
-#ifdef HAVE_LD80BITS
-GOW(roundl, DFD)
-#else
-GO2(roundl, KFK, round)
-#endif
+GODW(roundl, DFD, round)
 // scalb    // Weak
 // scalbf   // Weak
 // __scalbf_finite
@@ -510,50 +341,28 @@ DATAB(signgam, 8)
 GOW(sin, dFd)
 GOW(sincos, vFdpp)
 GOW(sincosf, vFfpp)
-#ifdef HAVE_LD80BITS
-GOW(sincosl, vFDpp)
-#else
-GO2(sincosl, vFKpp, sincos)
-#endif
+GODW(sincosl, vFDpp, sincos)
 GOW(sinf, fFf)
 GOW(sinh, dFd)
 GOW(sinhf, fFf)
 GOM(__sinhf_finite, fFf)
 GOM(__sinh_finite, dFd)
-#ifdef HAVE_LD80BITS
-GOW(sinhl, DFD)
-GOW(sinl, DFD)
-#else
-GO2(sinhl, KFK, sinh)
-GO2(sinl, KFK, sin)
-#endif
+GODW(sinhl, DFD, sinh)
+GODW(sinl, DFD, sin)
 GOW(sqrt, dFd)
 GOW(sqrtf, fFf)
 GOM(__sqrtf_finite, fFf)
 GOM(__sqrt_finite, dFd)
-#ifdef HAVE_LD80BITS
-GOW(sqrtl, DFD)
-#else
-GO2(sqrtl, KFK, sqrt)    // Weak
-#endif
+GODW(sqrtl, DFD, sqrt)
 GO(tan, dFd)
 GOW(tanf, fFf)
 GOW(tanh, dFd)
 GOW(tanhf, fFf)
-#ifdef HAVE_LD80BITS
-GOW(tanhl, DFD)
-GOW(tanl, DFD)
-#else
-GO2(tanhl, KFK, tanh)
-GO2(tanl, KFK, tan)
-#endif
+GODW(tanhl, DFD, tanh)
+GODW(tanl, DFD, tan)
 GOW(tgamma, dFd)
 GOW(tgammaf, fFf)
-#ifdef HAVE_LD80BITS
-GOW(tgammal, DFD)
-#else
-GO2(tgammal, KFK, tgamma)
-#endif
+GODW(tgammal, DFD, tgamma)
 GOW(trunc, dFd)
 GOW(truncf, fFf)
 // truncl   // Weak
@@ -571,8 +380,4 @@ GO(yn, dFid)
 GO(ynf, fFif)
 // __ynf_finite
 // __yn_finite
-#ifdef HAVE_LD80BITS
-GO(ynl, DFiD)
-#else
-GO2(ynl, KFiK, yn)
-#endif
+GOD(ynl, DFiD, yn)