--- a/MiniDebugger.st Mon Oct 27 23:59:14 2003 +0100
+++ b/MiniDebugger.st Tue Oct 28 00:00:49 2003 +0100
@@ -623,13 +623,13 @@
].
(prompt
- ? (nesting == 0 ifTrue:[
- 'MiniDebugger> '
- ] ifFalse:[
- 'MiniDebugger' , nesting printString , '>'
- ])) print.
+ ? (nesting == 0 ifTrue:[
+ 'MiniDebugger> '
+ ] ifFalse:[
+ 'MiniDebugger' , nesting printString , '>'
+ ])) print.
- UserInterruptSignal handle:[:ex |
+ UserInterrupt handle:[:ex |
ex restart
] do:[
|c cmd arg cnt|
@@ -786,5 +786,5 @@
!MiniDebugger class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.61 2003-10-27 22:59:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.62 2003-10-27 23:00:49 cg Exp $'
! !