Chris Muller uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-cmm.812.mcz
==================== Summary ====================
Name: Kernel-cmm.812 Author: cmm Time: 23 October 2013, 3:13:11.812 pm UUID: 68690126-9bc1-4cbc-b97e-75280610af28 Ancestors: Kernel-nice.811
Printing utilities for Blocks which include the source code of the block, and Errors which include the description and stack-trace.
=============== Diff against Kernel-nice.811 ===============
Item was changed: ----- Method: BlockClosure>>fullPrintOn: (in category 'printing') ----- + fullPrintOn: aStream + aStream + print: self ; + cr. + self printSourceOn: aStream! - fullPrintOn: aStream - aStream print: self; cr. - (self decompile ifNil: ['--source missing--']) printOn: aStream indent: 0!
Item was added: + ----- Method: BlockClosure>>printSourceOn: (in category 'printing') ----- + printSourceOn: aStream + self decompile + ifNil: [ aStream nextPutall: '--source missing--' ] + ifNotNil: + [ : parseNode | parseNode statements anyOne + printOn: aStream + indent: 0 ]!
Item was added: + ----- Method: BlockClosure>>sourceString (in category 'printing') ----- + sourceString + ^ String streamContents: [ : stream | self printSourceOn: stream ]!
Item was added: + ----- Method: Error>>printVerboseOn: (in category 'printing') ----- + printVerboseOn: aStream + aStream + wantsLineEndConversion: true ; + setToEnd ; + nextPutAll: 'vvvvvvvvvvvvvvvvvv ' , self description , ' vvvvvvvvvvvvvvvvvv' ; + cr ; + nextPutAll: 'The time is ', DateAndTime now asString ; + cr. + "Allow applications to optionally print extra details without overriding a base package." + (self respondsTo: #printDetailsOn:) ifTrue: [ self printDetailsOn: aStream ]. + aStream + nextPutAll: self signalerContext longStack ; + cr ; + nextPutAll: '^^^^^^^^^^^^^^^^^^ ' , self description , ' ^^^^^^^^^^^^^^^^^^' ; + cr!
squeak-dev@lists.squeakfoundation.org