hg/stx-goodies-regression: changeset 195:c1b18c70ebc1

author	Claus Gittinger <cg@exept.de>
	Tue, 17 Jun 2003 10:47:47 +0200
changeset 195	c1b18c70ebc1
parent 194	12598a62d57a
child 196	3c28a4e5daa5

checkin from browser

--- a/RegressionTests__FloatTest.st	Tue Jun 17 10:19:21 2003 +0200
+++ b/RegressionTests__FloatTest.st	Tue Jun 17 10:47:47 2003 +0200
@@ -307,6 +307,7 @@
         self assert:( 0.5 perform:op ) class == Float.
         self assert:( 0.5 asShortFloat perform:op ) class == Float.
         self assert:( 0.5 asLongFloat perform:op ) class == LongFloat.
+
         self assert:( (0.5 perform:op) - (0.5 asShortFloat perform:op) ) < 0.000001.
         self assert:( (0.5 perform:op) - (0.5 asLongFloat perform:op) ) < 0.000001.
         self assert:( (0.5 perform:op) - (0.5 perform:op) asShortFloat ) < 0.000001.