--- a/Float.st Mon Jun 30 16:48:37 2014 +0200
+++ b/Float.st Mon Jun 30 17:04:48 2014 +0200
@@ -1405,7 +1405,11 @@
*/
#ifndef INT64
-# define INT64 long long int
+# ifdef HAS_LONGLONG
+# define INT64 long long int
+# else
+# define INT64 __int64
+# endif
#endif
INT64 ulpDiff;
union {
@@ -1444,7 +1448,7 @@
}
// if the signs differ, the numbers are different
- if (signbit(myself.d) != signbit(otherFloat.d)) {
+ if ((myself.d >= 0) != (otherFloat.d >= 0)) {
RETURN(false);
}
@@ -3016,11 +3020,11 @@
!Float class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.200 2014-06-30 14:19:53 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.201 2014-06-30 15:04:48 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.200 2014-06-30 14:19:53 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.201 2014-06-30 15:04:48 cg Exp $'
! !