[MLton-commit] r4487

[Stephen Weeks]

Removed signbit code, which was moved to basis/real/signBit.c.

----------------------------------------------------------------------

U   mlton/branches/on-20050822-x86_64-branch/runtime/platform/openbsd.c
U   mlton/branches/on-20050822-x86_64-branch/runtime/platform/openbsd.h
D   mlton/branches/on-20050822-x86_64-branch/runtime/platform/signbit.c
U   mlton/branches/on-20050822-x86_64-branch/runtime/platform/solaris.c
U   mlton/branches/on-20050822-x86_64-branch/runtime/platform/solaris.h

----------------------------------------------------------------------

Modified: mlton/branches/on-20050822-x86_64-branch/runtime/platform/openbsd.c
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/runtime/platform/openbsd.c	2006-05-08 05:06:16 UTC (rev 4486)
+++ mlton/branches/on-20050822-x86_64-branch/runtime/platform/openbsd.c	2006-05-08 05:10:48 UTC (rev 4487)
@@ -3,7 +3,6 @@
 #include "getText.c"
 #include "mkdir2.c"
 #include "showMem.linux.c"
-#include "signbit.c"
 #include "ssmmap.c"
 #include "totalRam.sysctl.c"
 #include "use-mmap.c"

Modified: mlton/branches/on-20050822-x86_64-branch/runtime/platform/openbsd.h
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/runtime/platform/openbsd.h	2006-05-08 05:06:16 UTC (rev 4486)
+++ mlton/branches/on-20050822-x86_64-branch/runtime/platform/openbsd.h	2006-05-08 05:10:48 UTC (rev 4487)
@@ -31,5 +31,3 @@
 
 int fpclassify32 (float f);
 int fpclassify64 (double d);
-int signbit32 (float f);
-int signbit64 (double f);

Deleted: mlton/branches/on-20050822-x86_64-branch/runtime/platform/signbit.c
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/runtime/platform/signbit.c	2006-05-08 05:06:16 UTC (rev 4486)
+++ mlton/branches/on-20050822-x86_64-branch/runtime/platform/signbit.c	2006-05-08 05:10:48 UTC (rev 4487)
@@ -1,27 +0,0 @@
-#if (defined __i386__)
-
-enum {
-        R32_byte = 3,
-        R64_byte = 7,
-};
-
-#elif (defined __ppc__ || defined __sparc__)
-
-enum {
-        R32_byte = 0,
-        R64_byte = 0,
-};
-
-#else
-
-#error Real_signBit not implemented
-
-#endif
-
-Int signbit32 (Real32 f) {
-        return (((unsigned char *)&f)[R32_byte] & 0x80) >> 7;
-}
-
-Int signbit64 (Real64 d) {
-        return (((unsigned char *)&d)[R64_byte] & 0x80) >> 7;
-}

Modified: mlton/branches/on-20050822-x86_64-branch/runtime/platform/solaris.c
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/runtime/platform/solaris.c	2006-05-08 05:06:16 UTC (rev 4486)
+++ mlton/branches/on-20050822-x86_64-branch/runtime/platform/solaris.c	2006-05-08 05:10:48 UTC (rev 4487)
@@ -5,7 +5,6 @@
 #include "getText.c"
 #include "mkdir2.c"
 #include "mmap.c"
-#include "signbit.c"
 #include "ssmmap.c"
 #include "totalRam.sysconf.c"
 #include "setenv.putenv.c"

Modified: mlton/branches/on-20050822-x86_64-branch/runtime/platform/solaris.h
===================================================================
--- mlton/branches/on-20050822-x86_64-branch/runtime/platform/solaris.h	2006-05-08 05:06:16 UTC (rev 4486)
+++ mlton/branches/on-20050822-x86_64-branch/runtime/platform/solaris.h	2006-05-08 05:10:48 UTC (rev 4487)
@@ -46,8 +46,6 @@
 
 int fpclassify32 (float f);
 int fpclassify64 (double d);
-int signbit32 (float f);
-int signbit64 (double f);
 
 #ifndef PRIxPTR
 #define PRIxPTR "x"