math: fix tgamma to raise underflow for large negative values
[oweals/musl.git] / src / math / fabs.c
1 #include "libm.h"
2
3 double fabs(double x)
4 {
5         union dshape u;
6
7         u.value = x;
8         u.bits &= (uint64_t)-1 / 2;
9         return u.value;
10 }