changed: #test03_Conversion
authorClaus Gittinger <cg@exept.de>
Tue, 09 Aug 2011 21:02:13 +0200
changeset 621 30d1f61f7eb1
parent 620 8e10909bce70
child 622 25fd70ae2508
changed: #test03_Conversion
RegressionTests__FloatTest.st
--- a/RegressionTests__FloatTest.st	Tue Aug 09 20:58:06 2011 +0200
+++ b/RegressionTests__FloatTest.st	Tue Aug 09 21:02:13 2011 +0200
@@ -248,9 +248,11 @@
     self assert: ((Fraction basicNew setNumerator:500000000001 denominator:900000000000)
                         asLongFloat - 0.555555555555) abs >= 0.000000000001.
 
-    self assert: (8901234567890123456 asLongFloat asInteger = 8901234567890123456).    
-    self assert: (-8901234567890123456 asLongFloat asInteger = -8901234567890123456).
-
+    "/ under windows, a longFloat has only 10bytes with 64 bits precision
+    OperatingSystem isMSWINDOWSlike ifFalse:[
+        self assert: (8901234567890123456 asLongFloat asInteger = 8901234567890123456).    
+        self assert: (-8901234567890123456 asLongFloat asInteger = -8901234567890123456).
+    ].
     self assert: (89012345678901234567 asLongFloat = 89012345678901234567).    
     self assert: (-89012345678901234567 asLongFloat = -89012345678901234567).
     self assert: (89012345678901234567 negated asLongFloat = -89012345678901234567).
@@ -261,6 +263,8 @@
     "
      self basicNew test03_Conversion
     "
+
+    "Modified: / 09-08-2011 / 21:01:57 / cg"
 !
 
 test04_Arithmetic