--- a/Float.st	Mon Mar 25 23:04:02 2013 +0000
+++ b/Float.st	Wed Mar 27 12:24:15 2013 +0000
@@ -119,7 +119,7 @@
 # endif
 
 # ifndef isNegativeInfinity
-#  define isPositiveInfinity(x) \
+#  define isNegativeInfinity(x) \
 	((((unsigned int *)(&x))[0] == 0x00000000) && \
 	 (((unsigned int *)(&x))[1] == 0xFFF00000))
 # endif
@@ -137,6 +137,11 @@
 # define NO_ASINH
 # define NO_ACOSH
 # define NO_ATANH
+
+# ifdef __MINGW__
+#  include <string.h>
+# endif
+
 #endif /* WIN32 */
 
 #ifdef solaris
@@ -440,14 +445,14 @@
     self isIEEEFormat ifFalse:[self error:'unsupported operation'].
 
     (UninterpretedBytes isBigEndian == msb) ifFalse:[
-        "swap the bytes"
-        8 to:1 by:-1 do:[:i |
-            aFloat basicAt:i put:(aStream next)
-        ].
-        ^ self
+	"swap the bytes"
+	8 to:1 by:-1 do:[:i |
+	    aFloat basicAt:i put:(aStream next)
+	].
+	^ self
     ].
     1 to:8 do:[:i |
-        aFloat basicAt:i put:aStream next
+	aFloat basicAt:i put:aStream next
     ]
 
     "not part of libboss, as this is also used by others (TIFFReader)"
@@ -476,14 +481,14 @@
     self isIEEEFormat ifFalse:[self error:'unsupported operation'].
 
     (UninterpretedBytes isBigEndian == msb) ifFalse:[
-        "swap the bytes"
-        8 to:1 by:-1 do:[:i |
-            aStream nextPut:(aFloat basicAt:i).
-        ].
-        ^ self
+	"swap the bytes"
+	8 to:1 by:-1 do:[:i |
+	    aStream nextPut:(aFloat basicAt:i).
+	].
+	^ self
     ].
     1 to:8 do:[:i |
-        aStream nextPut:(aFloat basicAt:i).
+	aStream nextPut:(aFloat basicAt:i).
     ].
 
     "not part of libboss, as this is also used by others (TIFFReader)"
@@ -2867,11 +2872,11 @@
 !Float class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.190 2013-03-20 15:43:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.191 2013-03-22 09:44:22 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.190 2013-03-20 15:43:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.191 2013-03-22 09:44:22 cg Exp $'
 ! !