nsz Git - musl/blob - src/math/significandl.c

   1 #define _GNU_SOURCE
   2 #include <math.h>
   3
   4 long double significandl(long double x)
   5 {
   6         return scalbnl(x, -ilogbl(x));
   7 }