add significand[fl] math functions

[musl] / src / math / significand.c

diff --git a/src/math/significand.c b/src/math/significand.c
new file mode 100644 (file)
index 0000000..40d9aa9
--- /dev/null
+++ b/src/math/significand.c
@@ -0,0 +1,7 @@
+#define _GNU_SOURCE
+#include <math.h>
+
+double significand(double x)
+{
+       return scalbn(x, -ilogb(x));
+}