Use class based exceptions.
Documentation.
--- a/DebugView.st Fri Jan 21 18:13:39 2005 +0100
+++ b/DebugView.st Wed Jan 26 15:09:32 2005 +0100
@@ -5038,12 +5038,12 @@
signal := ex signal.
DebuggingDebugger ~~ true ifTrue:[
+ (signal == ActivityNotification) ifTrue:[
+ ex proceed
+ ].
"/
"/ ignore recursive breakpoints
"/
- (signal == ActivityNotificationSignal) ifTrue:[
- ex proceed
- ].
(signal isControlInterrupt) ifTrue:[
ignoreBreakpoints == true ifTrue:[
'DebugView [info]: halt/break in debugger ignored 1' infoPrintCR.
@@ -5867,7 +5867,7 @@
!DebugView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.378 2005-01-21 17:13:39 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.379 2005-01-26 14:09:32 stefan Exp $'
! !
DebugView initialize!