github.com/afumu/libc@v0.0.6/musl/src/math/fabsl.c (about)

     1  #include "libm.h"
     2  #if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
     3  long double fabsl(long double x)
     4  {
     5  	return fabs(x);
     6  }
     7  #elif (LDBL_MANT_DIG == 64 || LDBL_MANT_DIG == 113) && LDBL_MAX_EXP == 16384
     8  long double fabsl(long double x)
     9  {
    10  	union ldshape u = {x};
    11  
    12  	u.i.se &= 0x7fff;
    13  	return u.f;
    14  }
    15  #endif