--- a/ObjectMemory.st Mon Jul 18 16:22:09 2011 +0100
+++ b/ObjectMemory.st Wed Aug 10 15:59:08 2011 +0100
@@ -4042,22 +4042,24 @@
performLowSpaceCleanup
"ask all classes to remove possibly cached data.
You may help the system a bit, in providing a lowSpaceCleanup method
- in your classes which have lots of data kept somewhere (usually, cached data)."
+ in your classes which have lots of data kept somewhere (usually, cached data).
+ Notice: it may never hurt to call lowSpaceCleanup (i.e. the data must always be
+ reconstructable)"
"avoid to allocate memory here - so don't send Smalltalk>>allClassesDo:,
which allocates an IdentitySet"
Smalltalk do:[:eachGlobal|
- eachGlobal isBehavior ifTrue:[
- eachGlobal lowSpaceCleanup
- ].
+ eachGlobal isBehavior ifTrue:[
+ eachGlobal lowSpaceCleanup
+ ].
].
"
- ObjectMemory performLowSpaceCleanup
- "
-
- "Created: 12.4.1996 / 14:57:28 / cg"
+ ObjectMemory performLowSpaceCleanup
+ "
+
+ "Created: / 12-04-1996 / 14:57:28 / cg"
! !
!ObjectMemory class methodsFor:'object finalization'!
@@ -5440,11 +5442,12 @@
!ObjectMemory class methodsFor:'documentation'!
version_CVS
- ^ '§Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.251 2011/06/28 14:00:53 vrany Exp §'
+ ^ '§Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.252 2011/08/08 17:20:22 cg Exp §'
!
version_SVN
- ^ '$Id: ObjectMemory.st 10660 2011-07-18 15:22:09Z vranyj1 $'
+ ^ '$ Id: ObjectMemory.st 10643 2011-06-08 21:53:07Z vranyj1 $'
! !
ObjectMemory initialize!
+