xref: /haiku/src/system/libroot/posix/musl/math/fabsl.c (revision 42f51416eb68b0a79f50fe185b6d0ecb064c62dc)
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
16