Levente Uzonyi uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ul.437.mcz

==================== Summary ====================

Name: System-ul.437
Author: ul
Time: 12 May 2011, 4:47:47.49 am
UUID: aaa23937-4d09-164a-ae52-3e93536f4992
Ancestors: System-ul.436

- fix: SmalltalkImage >> #abandonTempNames tried to replace the trailer of the methods with an Array instead of a CompiledMethodTrailer.

=============== Diff against System-ul.436 ===============

Item was changed:
  ----- Method: SmalltalkImage>>abandonTempNames (in category 'shrinking') -----
  abandonTempNames
  	"Replaces every method by a copy with no source pointer or
  	encoded temp names."
  	"Smalltalk abandonTempNames"
  	| continue oldMethods newMethods n |
  	continue := self confirm: '-- CAUTION --
  If you have backed up your system and
  are prepared to face the consequences of
  abandoning all source code, hit Yes.
  If you have any doubts, hit No,
  to back out with no harm done.'.
  	continue
  		ifFalse: [^ self inform: 'Okay - no harm done'].
  	self forgetDoIts; garbageCollect.
  	oldMethods := OrderedCollection new.
  	newMethods := OrderedCollection new.
  	n := 0.
  	'Removing temp names to save space...'
  		displayProgressAt: Sensor cursorPoint
  		from: 0
+ 		to: CompiledMethod instanceCount "This is just a rough guess."
- 		to: CompiledMethod instanceCount
  		during: [:bar | self systemNavigation
+ 			allBehaviorsDo: [:cl | cl methodsDo: [:m | 
+ 				bar value: (n := n + 1).
+ 				oldMethods addLast: m.
+ 				newMethods
+ 					addLast: (m copyWithTrailerBytes: CompiledMethodTrailer empty)]]].
- 				allBehaviorsDo: [:cl | cl methodsDo: [:m | 
- 							bar value: (n := n + 1).
- 							oldMethods addLast: m.
- 							newMethods
- 								addLast: (m copyWithTrailerBytes: #(0 ))]]].
  	oldMethods asArray elementsExchangeIdentityWith: newMethods asArray.
  	SmalltalkImage current closeSourceFiles.
  	self flag: #shouldUseAEnsureBlockToBeSureThatTheFileIsClosed.
  	"sd: 17 April 2003"
  	Preferences disable: #warnIfNoChangesFile.
  	Preferences disable: #warnIfNoSourcesFile!