--- a/Number.st	Sun Aug 01 12:11:07 2010 +0100
+++ b/Number.st	Tue Aug 10 09:55:15 2010 +0100
@@ -704,7 +704,6 @@
     ^ self == Number
 ! !
 
-
 !Number methodsFor:'Compatibility-Squeak'!
 
 asSmallAngleDegrees
@@ -797,9 +796,13 @@
     "
      1 closeTo:1.0000000001
      1 closeTo:1.001
+
+     3.14 closeTo:(3.14 asFixedPoint:2)
+     (3.14 asFixedPoint:2) closeTo:3.14
     "
 
-    "Created: / 5.11.2001 / 18:07:26 / cg"
+    "Created: / 05-11-2001 / 18:07:26 / cg"
+    "Modified: / 02-08-2010 / 13:27:22 / cg"
 !
 
 degreeCos
@@ -2248,16 +2251,17 @@
 !Number class methodsFor:'documentation'!
 
 version
-    ^ '$Id: Number.st 10544 2010-07-12 16:20:36Z vranyj1 $'
+    ^ '$Id: Number.st 10564 2010-08-10 08:55:15Z vranyj1 $'
 !
 
 version_CVS
-    ^ 'Header: /cvs/stx/stx/libbasic/Number.st,v 1.132 2010/03/06 11:29:09 cg Exp '
+    ^ 'Header: /cvs/stx/stx/libbasic/Number.st,v 1.133 2010/08/02 11:27:38 cg Exp '
 !
 
 version_SVN
-    ^ '$Id: Number.st 10544 2010-07-12 16:20:36Z vranyj1 $'
+    ^ '$Id: Number.st 10564 2010-08-10 08:55:15Z vranyj1 $'
 ! !
 
 
 
+