--- a/Float.st Wed Jul 06 13:54:12 2005 +0200
+++ b/Float.st Thu Jul 07 17:01:53 2005 +0200
@@ -337,7 +337,7 @@
float f;
} r;
-#ifdef i386 /* actually: LSBFIRST */
+#ifdef __LSBFIRST__
r.b[3] = __intVal( b2 );
r.b[2] = __intVal( b1 );
r.b[1] = __intVal( b4 );
@@ -474,7 +474,7 @@
few selected architectures."
%{ /* NOCONTEXT */
-#if defined(LINUX) && defined(i386)
+#if defined(LINUX) && defined(__i386__)
# ifdef NAN
RETURN (__MKFLOAT(NAN));
# else
@@ -1835,7 +1835,7 @@
"many systems have two float.Pnt zeros"
%{
-#if defined(i386) && defined(linux)
+#if defined(__i386__) && defined(LINUX)
unsigned int biasedExponent;
biasedExponent = ((short *)(__ByteArrayInstPtr(self)->ba_element))[3] & 0xFF70;
@@ -2583,7 +2583,7 @@
!Float class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.155 2004-11-12 12:22:58 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.156 2005-07-07 15:01:52 cg Exp $'
! !
Float initialize!