Nicolas Cellier uploaded a new version of EToys to project The Trunk: http://source.squeak.org/trunk/EToys-nice.43.mcz
==================== Summary ====================
Name: EToys-nice.43 Author: nice Time: 1 January 2010, 1:21:24 am UUID: 0809d469-fce8-43e5-ab17-17c7fcc29589 Ancestors: EToys-nice.42
Don't assign block argument with nil, with closure that is not necessary.
=============== Diff against EToys-nice.42 ===============
Item was changed: ----- Method: Player class>>abandonUnnecessaryUniclasses (in category 'housekeeping') ----- abandonUnnecessaryUniclasses "Player abandonUnnecessaryUniclasses" | oldCount oldFree newFree newCount report | oldCount := self subclasses size - 1. oldFree := Smalltalk garbageCollect. self allSubInstances do: + [:aPlayer | aPlayer revertToUnscriptedPlayerIfAppropriate]. - [:aPlayer | aPlayer revertToUnscriptedPlayerIfAppropriate. - "encourage last one to get garbage-collected" - aPlayer := nil ].
ScriptingSystem spaceReclaimed. newFree := Smalltalk garbageCollect. newCount := self subclasses size - 1. report := 'Before: ', oldCount printString, ' uniclasses, ', oldFree printString, ' bytes free After: ', newCount printString, ' uniclasses, ', newFree printString, ' bytes free'. Transcript cr; show: 'abandonUnnecessaryUniclasses:'; cr; show: report. ^ report !