> after my correction in
>   correction [was: Re: [FIX] SortedCollectionFix-sr]
> , I think the reason for the performance loss in the 
> 'unoptimized' version
> must be the temporarily construction of a *Set* of keys  (an
> OrderedCollection would be cheaper) in:

Well, then let's make it something different ;-)

keysSortedSafely
	^SortedCollection
		withAll: (Array streamContents:[:s| self keysDo:[:key| s
nextPut: key]])
		sortBlock:[...]

Cheers,
  - Andreas