Eliot Miranda uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-eem.749.mcz==================== Summary ====================
Name: Kernel-eem.749
Author: eem
Time: 15 March 2013, 3:20:44.917 pm
UUID: 73418d30-16f5-44e4-aca3-8a2ba22bc43c
Ancestors: Kernel-nice.748
Less noise in abstractSymbolic sends. Plus better send
printing for both abstractSymbolic and symbolic if selector
is not a symbol.
=============== Diff against Kernel-nice.748 ===============
Item was changed:
----- Method: InstructionPrinter>>send:super:numArgs: (in category 'instruction decoding') -----
+ send: selector super: supered numArgs: numArgs
- send: selector super: supered numArgs: numberArguments
"Print the Send Message With Selector, selector, bytecode. The argument,
supered, indicates whether the receiver of the message is specified with
'super' in the source method. The arguments of the message are found in
the top numArguments locations on the stack and the receiver just
below them."
+ self print: (supered
+ ifTrue: ['superSend: ']
+ ifFalse: ['send: '])
+ , (self stringForSelector: selector numArgs: numArgs).
- self print: (supered ifTrue: ['superSend: '] ifFalse: ['send: ']) , selector.
indentSpanOfFollowingJump := #(blockCopy: #closureCopy:copiedValues:) includes: selector!
Item was added:
+ ----- Method: InstructionPrinter>>stringForSelector:numArgs: (in category 'printing') -----
+ stringForSelector: selector numArgs: numArgs
+ ^(selector isSymbol and: [selector numArgs = numArgs])
+ ifTrue: [selector]
+ ifFalse: [selector printString
+ , (numArgs = 1
+ ifTrue: [' (1 arg)']
+ ifFalse: [' (', numArgs printString, ' args)'])]!
Item was removed:
- ----- Method: RelativeInstructionPrinter>>send:super:numArgs: (in category 'instruction decoding') -----
- send: selector super: supered numArgs: numArgs
- "Print the Send Message With Selector, selector, bytecode. The argument,
- supered, indicates whether the receiver of the message is specified with
- 'super' in the source method. The arguments of the message are found in
- the top numArguments locations on the stack and the receiver just
- below them."
-
- self print: (supered
- ifTrue: ['superSend: ']
- ifFalse: ['send: '])
- , selector storeString
- , (numArgs = 1
- ifTrue: [' (1 arg)']
- ifFalse: [' (', numArgs printString, ' args)'])!