summaryrefslogtreecommitdiff
path: root/glib/gnulib/frexpl.c
diff options
context:
space:
mode:
Diffstat (limited to 'glib/gnulib/frexpl.c')
-rw-r--r--glib/gnulib/frexpl.c19
1 files changed, 19 insertions, 0 deletions
diff --git a/glib/gnulib/frexpl.c b/glib/gnulib/frexpl.c
new file mode 100644
index 000000000..5736dc848
--- /dev/null
+++ b/glib/gnulib/frexpl.c
@@ -0,0 +1,19 @@
+#include <config.h>
+#include <gnulib_math.h>
+#include <float.h>
+#include <math.h>
+
+long double rpl_frexpl (long double x, int *expptr)
+{
+ if (x == 0.0L || x == -0.0L)
+ {
+ *expptr = x;
+ return x;
+ }
+ else if (isnanl (x))
+ return x;
+ else if (isinf (x))
+ return x;
+#undef frexpl
+ return frexpl (x, expptr);
+}