Eliot Miranda uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-eem.938.mcz==================== Summary ====================
Name: Kernel-eem.938
Author: eem
Time: 11 August 2015, 6:26:26.719 pm
UUID: f142f874-0cab-43d2-98c5-92fdf103028d
Ancestors: Kernel-cmm.937
Have ClassDescription>>moveChangesTo: write the class's definition before the changes if there are any so that the changes file is a potential application recovery vehicle, not just a crash recovery vehicle.
=============== Diff against Kernel-cmm.937 ===============
Item was changed:
----- Method: ClassDescription>>moveChangesTo: (in category 'fileIn/Out') -----
moveChangesTo: newFile
"Used in the process of condensing changes, this message requests that
the source code of all methods of the receiver that have been changed
should be moved to newFile."
| changes |
+ changes := self methodDict keys select:
+ [:sel | (self compiledMethodAt: sel) fileIndex > 1].
+ changes isEmpty ifTrue:
+ [^self].
+ newFile cr; cr; command: 'H3'; nextChunkPut: self definition; command: '/H3'; cr.
- changes := self methodDict keys select: [:sel |
- (self compiledMethodAt: sel) fileIndex > 1].
self
fileOutChangedMessages: changes
on: newFile
moveSource: #historically
toFile: 2!