Welcome to mirror list, hosted at ThFree Co, Russian Federation.

cygwin.com/git/newlib-cygwin.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'newlib/libm/common/sf_isinff.c')
-rw-r--r--newlib/libm/common/sf_isinff.c27
1 files changed, 27 insertions, 0 deletions
diff --git a/newlib/libm/common/sf_isinff.c b/newlib/libm/common/sf_isinff.c
new file mode 100644
index 000000000..9d0e742e5
--- /dev/null
+++ b/newlib/libm/common/sf_isinff.c
@@ -0,0 +1,27 @@
+/*
+ * __isinff(x) returns 1 if x is +-infinity, else 0;
+ * Added by Cygnus Support.
+ */
+
+#include "fdlibm.h"
+
+int
+_DEFUN (__isinff, (x),
+ float x)
+{
+ __int32_t ix;
+ GET_FLOAT_WORD(ix,x);
+ ix &= 0x7fffffff;
+ return FLT_UWORD_IS_INFINITE(ix);
+}
+
+#ifdef _DOUBLE_IS_32BITS
+
+int
+_DEFUN (__isinfd, (x),
+ double x)
+{
+ return __isinff((float) x);
+}
+
+#endif /* defined(_DOUBLE_IS_32BITS) */