From: ceriel <none@none>
Date: Tue, 4 Jun 1991 15:33:34 +0000 (+0000)
Subject: Added isnan.c
X-Git-Tag: release-5-5~1112
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=3e9b9b3cbefe6874170112c67f3002a0299a7433;p=ack.git

Added isnan.c
---

diff --git a/lang/cem/libcc.ansi/math/isnan.c b/lang/cem/libcc.ansi/math/isnan.c
new file mode 100644
index 000000000..21497a9cd
--- /dev/null
+++ b/lang/cem/libcc.ansi/math/isnan.c
@@ -0,0 +1,11 @@
+__IsNan(double d)
+{
+#if defined(vax) || defined(pdp)
+#else
+	float f = d;
+
+	if ((*((long *) &f) & 0x7f800000) == 0x7f800000 &&
+	    (*((long *) &f) & 0x007fffff) != 0) return 1;
+#endif
+	return 0;
+}