From 7ce331c01ce6eb7b3f5c715a38a24359da9c6ee2 Mon Sep 17 00:00:00 2001 From: Eric Andersen Date: Thu, 22 Nov 2001 14:04:29 +0000 Subject: Totally rework the math library, this time based on the MacOs X math library (which is itself based on the math lib from FreeBSD). -Erik --- libm/float/nantst.c | 54 ----------------------------------------------------- 1 file changed, 54 deletions(-) delete mode 100644 libm/float/nantst.c (limited to 'libm/float/nantst.c') diff --git a/libm/float/nantst.c b/libm/float/nantst.c deleted file mode 100644 index 7edd992ae..000000000 --- a/libm/float/nantst.c +++ /dev/null @@ -1,54 +0,0 @@ -float inf = 1.0f/0.0f; -float nnn = 1.0f/0.0f - 1.0f/0.0f; -float fin = 1.0f; -float neg = -1.0f; -float nn2; - -int isnanf(), isfinitef(), signbitf(); - -void pvalue (char *str, float x) -{ -union - { - float f; - unsigned int i; - }u; - -printf("%s ", str); -u.f = x; -printf("%08x\n", u.i); -} - - -int -main() -{ - -if (!isnanf(nnn)) - abort(); -pvalue("nnn", nnn); -pvalue("inf", inf); -nn2 = inf - inf; -pvalue("inf - inf", nn2); -if (isnanf(fin)) - abort(); -if (isnanf(inf)) - abort(); -if (!isfinitef(fin)) - abort(); -if (isfinitef(nnn)) - abort(); -if (isfinitef(inf)) - abort(); -if (!signbitf(neg)) - abort(); -if (signbitf(fin)) - abort(); -if (signbitf(inf)) - abort(); -/* -if (signbitf(nnn)) - abort(); - */ -exit (0); -} -- cgit v1.2.3