Frank Shearar uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-fbs.775.mcz
==================== Summary ====================
Name: Kernel-fbs.775 Author: fbs Time: 29 June 2013, 11:02:47.13 pm UUID: 1185b53c-5a7c-6442-bb20-2177e05ace9e Ancestors: Kernel-fbs.774
Don't use Utilities. It needs to go.
=============== Diff against Kernel-fbs.774 ===============
Item was changed: ----- Method: ObjectOut>>xxxFixup (in category 'fetch from disk') ----- xxxFixup "There is already an object in memory for my url. All pointers to me need to be pointers to him. Can't use become, because other pointers to him must stay valid."
| real temp list | real := page contentsMorph. real == self ifTrue: [page error: 'should be converted by now']. temp := self. + list := (PointerFinder pointersTo: temp) asOrderedCollection. - list := (Utilities pointersTo: temp) asOrderedCollection. list add: thisContext. list add: thisContext sender. list do: [:holder | 1 to: holder class instSize do: [:i | (holder instVarAt: i) == temp ifTrue: [holder instVarAt: i put: real]]. 1 to: holder basicSize do: [:i | (holder basicAt: i) == temp ifTrue: [holder basicAt: i put: real]]. ]. ^ real!