--- a/Smalltalk.st Sun Mar 31 02:36:38 2013 +0000
+++ b/Smalltalk.st Sun Mar 31 02:49:20 2013 +0000
@@ -683,7 +683,9 @@
!
garbageCollect
- ObjectMemory garbageCollect
+ "for Squeak compatibility"
+
+ ObjectMemory garbageCollect
!
garbageCollectMost
@@ -692,9 +694,7 @@
newSpace + freeListSpace is returned."
ObjectMemory scavenge.
- ^ ObjectMemory freeSpace
- + (ObjectMemory newSpaceSize - ObjectMemory newSpaceUsed)
-
+ ^ ObjectMemory freeSpace + (ObjectMemory newSpaceSize - ObjectMemory newSpaceUsed)
!
isMorphic
@@ -7907,11 +7907,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_SVN