[Pkg] The Trunk: Tools-mtf.295.mcz

commits at source.squeak.org commits at source.squeak.org
Sun Feb 6 00:46:27 UTC 2011

Matthew Fulmer uploaded a new version of Tools to project The Trunk:

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

Name: Tools-mtf.295
Author: mtf
Time: 5 February 2011, 7:45:17.71 pm
UUID: bfade890-b172-4c71-b4dd-97862669ca27
Ancestors: Tools-laza.294

log user inturrupts same as errors

=============== Diff against Tools-laza.294 ===============

Item was changed:
  ----- Method: Debugger class>>openInterrupt:onProcess: (in category 'opening') -----
  openInterrupt: aString onProcess: interruptedProcess
  	"Open a notifier in response to an interrupt. An interrupt occurs when the user types the interrupt key (cmd-. on Macs, ctrl-c or alt-. on other systems) or when the low-space watcher detects that memory is low."
  	| debugger |
  	<primitive: 19> "Simulation guard"
  	debugger := self new.
  		process: interruptedProcess
  		controller: ((Smalltalk isMorphic not
  					and: [ScheduledControllers activeControllerProcess == interruptedProcess])
  						ifTrue: [ScheduledControllers activeController])
  		context: interruptedProcess suspendedContext.
  	debugger externalInterrupt: true.
  Preferences logDebuggerStackToFile ifTrue:
  	[(aString includesSubString: 'Space') & 
  		(aString includesSubString: 'low') ifTrue: [
+ 			Smalltalk logError: aString inContext: debugger interruptedContext to:'LowSpaceDebug.log']
+ 		ifFalse: [Smalltalk logSqueakError: aString inContext: debugger interruptedContext]].
- 			Smalltalk logError: aString inContext: debugger interruptedContext to:'LowSpaceDebug.log']].
  	Preferences eToyFriendly ifTrue: [World stopRunningAll].
  	^ debugger
  		openNotifierContents: nil
  		label: aString

More information about the Packages mailing list