Import Upstream version 2.72.4

glib/gnulib/frexp.c

@@ -0,0 +1,22 @@
+#include <config.h>
+
+/* Specification.  */
+#include <gnulib_math.h>
+
+#include <float.h>
+#include "isnand-nolibm.h"
+
+double rpl_frexp (double x, int *expptr)
+{
+  if (x == 0.0 || x == -0.0)
+  {
+    *expptr = x;
+    return x;
+  }
+  else if (isnan (x))
+    return x;
+  else if (isinf (x))
+    return x;
+#undef frexp
+  return frexp (x, expptr);
+}