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 }