The Trunk: Kernel-eem.1076.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Kernel-eem.1076.mcz

commits-2
Eliot Miranda uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-eem.1076.mcz

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

Name: Kernel-eem.1076
Author: eem
Time: 30 March 2017, 1:56:08.159569 pm
UUID: 5bd0442e-e498-4794-a357-40629712f858
Ancestors: Kernel-eem.1075

Add the method to bootstrap MethodContext => Context (to the class side of InstructionStream so its not going to move).  Make sure the old name is still around until after the putsch.

=============== Diff against Kernel-eem.1075 ===============

Item was added:
+ ----- Method: InstructionStream class>>bootstrapContext (in category 'bootstrap context') -----
+ bootstrapContext
+ "Rename MethodContext to Context."
+ "InstructionStream bootstrapContext"
+ thisContext class name = #Context ifTrue:
+ [self assert: (Smalltalk classNamed: #MethodContext) == thisContext class.
+ self assert: (Smalltalk classNamed: #Context) == thisContext class.
+ ^self].
+ MethodContext ensureClassPool.
+ MethodContext classPool addAll: ContextPart classPool associations.
+ MethodContext superclass: InstructionStream.
+ MethodContext class superclass: InstructionStream class.
+ InstructionStream addSubclass: MethodContext.
+ MethodContext
+ setInstVarNames: ContextPart instVarNames, MethodContext instVarNames;
+ rename: #Context.
+ Smalltalk at: #MethodContext ifAbsentPut: [Smalltalk classNamed: #Context].
+ self assert: (Smalltalk classNamed: #MethodContext) == thisContext class.
+ self assert: (Smalltalk classNamed: #Context) == thisContext class!