Tobias Pape uploaded a new version of Compiler to project The Trunk:
http://source.squeak.org/trunk/Compiler-topa.292.mcz==================== Summary ====================
Name: Compiler-topa.292
Author: topa
Time: 24 January 2015, 3:21:01.295 pm
UUID: 96d2c928-fd32-4327-b74a-55e09df39549
Ancestors: Compiler-eem.291
Fix super-send DoIts in the debugger.
=============== Diff against Compiler-eem.291 ===============
Item was changed:
----- Method: Compiler>>evaluate:in:to:notifying:ifFail: (in category 'public access') -----
evaluate: textOrStream in: aContext to: receiver notifying: aRequestor ifFail: failBlock
"Compiles the sourceStream into a parse tree, then generates code into
a method. If aContext is not nil, the text can refer to temporaries in that
context (the Debugger uses this). If aRequestor is not nil, then it will receive
a notify:at: message before the attempt to evaluate is aborted. Finally, the
compiled method is invoked from here via withArgs:executeMethod:, hence
the system no longer creates Doit method litter on errors."
| theClass |
+ theClass := aContext ifNil: [receiver class] ifNotNil: [:ctx | ctx methodClass].
- theClass := ((aContext == nil ifTrue: [receiver] ifFalse: [aContext receiver]) class).
^self
evaluateCue: (CompilationCue
source: textOrStream
context: aContext
receiver: receiver
class: theClass
environment: theClass environment
requestor: aRequestor)
ifFail: failBlock!