The Trunk: Kernel-nice.281.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-nice.281.mcz

commits-2
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!