Nicolas Cellier uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-nice.281.mcz==================== Summary ====================
Name: Kernel-nice.281
Author: nice
Time: 23 October 2009, 11:08:25 am
UUID: c2f3dbc8-83f0-47ad-95e4-195f18f09f30
Ancestors: Kernel-nice.280
Pick in Pharo one forgotten changes of Eliot closure...
That makes more ClosureCompilerTest green
=============== Diff against Kernel-nice.280 ===============
Item was changed:
----- Method: ContextPart>>runSimulated:contextAtEachStep: (in category 'system simulation') -----
runSimulated: aBlock contextAtEachStep: block2
"Simulate the execution of the argument, aBlock, until it ends. aBlock
MUST NOT contain an '^'. Evaluate block2 with the current context
prior to each instruction executed. Answer the simulated value of aBlock."
-
| current |
+ aBlock hasMethodReturn
- (aBlock isBlock and: [aBlock hasMethodReturn])
ifTrue: [self error: 'simulation of blocks with ^ can run loose'].
current := aBlock asContext.
+ current pushArgs: Array new from: self.
- current privSender: self.
[current == self]
whileFalse:
[block2 value: current.
current := current step].
+ ^self pop!
- ^ self pop!