--- a/Smalltalk.st	Thu Mar 28 12:21:50 2013 +0000
+++ b/Smalltalk.st	Mon Apr 01 13:42:45 2013 +0100
@@ -685,7 +685,9 @@
 !
 
 garbageCollect
-   ObjectMemory garbageCollect
+    "for Squeak compatibility"
+
+    ObjectMemory garbageCollect
 !
 
 garbageCollectMost
@@ -694,9 +696,7 @@
      newSpace + freeListSpace is returned."
 
     ObjectMemory scavenge.
-    ^ ObjectMemory freeSpace
-      + (ObjectMemory newSpaceSize - ObjectMemory newSpaceUsed)
-
+    ^ ObjectMemory freeSpace + (ObjectMemory newSpaceSize - ObjectMemory newSpaceUsed)
 !
 
 isMorphic
@@ -7978,11 +7978,11 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1018 2013-03-27 19:13:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1019 2013-03-31 02:49:20 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1018 2013-03-27 19:13:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1019 2013-03-31 02:49:20 cg Exp $'
 !
 
 version_HG