[squeak-dev] The Trunk: Kernel-dtl.413.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Feb 27 16:50:12 UTC 2010

David T. Lewis uploaded a new version of Kernel to project The Trunk:

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

Name: Kernel-dtl.413
Author: dtl
Time: 27 February 2010, 11:48:03.105 am
UUID: 4caf42d6-8202-4818-b86e-de4a60c4e1e3
Ancestors: Kernel-ar.412

Remove need for #isMorphic in Object>>primitiveError:

=============== Diff against Kernel-ar.412 ===============

Item was changed:
  ----- Method: Object>>primitiveError: (in category 'private') -----
  primitiveError: aString 
  	"This method is called when the error handling results in a recursion in 
  	calling on error: or halt or halt:."
  			[:s |
  			| context |
  			s nextPutAll: '***System error handling failed***'.
  			s cr; nextPutAll: aString.
  			context := thisContext sender sender.
  			20 timesRepeat: [context == nil ifFalse: [s cr; print: (context := context sender)]].
  			s cr; nextPutAll: '-------------------------------'.
  			s cr; nextPutAll: 'Type CR to enter an emergency evaluator.'.
  			s cr; nextPutAll: 'Type any other character to restart.'])
  		displayAt: 0 @ 0.
  	[Sensor keyboardPressed] whileFalse.
  	Sensor keyboard = Character cr ifTrue: [Transcripter emergencyEvaluator].
+ 	Project current resetDisplay
+ !
- 	Smalltalk isMorphic
- 		ifTrue: [World install "init hands and redisplay"]
- 		ifFalse: [ScheduledControllers searchForActiveController]!

More information about the Squeak-dev mailing list