Nicolas Cellier uploaded a new version of ScriptLoader to project The Trunk:
http://source.squeak.org/trunk/ScriptLoader-nice.334.mcz==================== Summary ====================
Name: ScriptLoader-nice.334
Author: nice
Time: 21 January 2013, 10:27:12.81 pm
UUID: 799ab5df-2878-4ca3-948b-d2c37618e11d
Ancestors: ScriptLoader-ul.333
Reduce level of superstition: 1 garbageCollect is worth 3.
=============== Diff against ScriptLoader-ul.333 ===============
Item was changed:
----- Method: ScriptLoader>>finalCleanup (in category 'cleaning') -----
finalCleanup
"self new finalCleanup"
DataStream initialize.
Behavior flushObsoleteSubclasses.
"The pointer to currentMethod is not realy needed (anybody care to fix this) and often holds on to obsolete bindings"
MethodChangeRecord allInstancesDo: [:each | each noteNewMethod: nil].
self cleanUpEtoys.
SmalltalkImage current fixObsoleteReferences.
Smalltalk flushClassNameCache.
SystemOrganization removeEmptyCategories.
+ Symbol compactSymbolTable.
- 3 timesRepeat: [
- Smalltalk garbageCollect.
- Symbol compactSymbolTable.
- ].
!