[squeak-dev] The Trunk: Kernel-eem.932.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Jul 1 23:39:23 UTC 2015


Eliot Miranda uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-eem.932.mcz

==================== Summary ====================

Name: Kernel-eem.932
Author: eem
Time: 1 July 2015, 4:38:42.065 pm
UUID: 12b4ce38-269d-4f6f-9b12-eae61d403a03
Ancestors: Kernel-eem.931

Provide the same Debugger label support as complete: for the step into block support.

=============== Diff against Kernel-eem.931 ===============

Item was changed:
  ----- Method: Process>>stepToHome: (in category 'changing suspended state') -----
  stepToHome: aContext 
  	"Resume self until the home of top context is aContext.  Top context may be a block context.
  	 Catch any UnhandledErrors that are created while stepping, answering the relevant signalerContext
  	 if so. Note that this will cause weird effects if using through to step through UnhandledError
  	 code, but as the doctor ordered, don't do that; use over or into instead."
  
  	^Processor activeProcess
  		evaluate:
  			[| home anError |
  			home := aContext home.
  			[suspendedContext := suspendedContext step.
  			 home == suspendedContext home or: [home isDead]] whileFalse:
  				[(suspendedContext selector == #signalForException:
  				 and: [suspendedContext receiver == UnhandledError
  				 and: [anError := suspendedContext tempAt: 1.
  					   ((suspendedContext objectClass: anError) includesBehavior: Exception)
  				 and: [anError canSearchForSignalerContext]]]) ifTrue:
  					[anError signalerContext ifNotNil:
  						[:unhandledErrorSignalerContext|
  						[unhandledErrorSignalerContext == suspendedContext] whileFalse:
  							[self completeStep: suspendedContext].
+ 						"Give a debugger a chance to update its title to reflect the new exception"
+ 						 Notification new
+ 							tag: {unhandledErrorSignalerContext. anError};
+ 							signal.
  						^unhandledErrorSignalerContext]]].
  			suspendedContext]
  		onBehalfOf: self!



More information about the Squeak-dev mailing list