DebugView.st
changeset 430 45d1b89689a0
parent 425 92f7a92f5c44
child 448 e50e23ae7dc3
--- a/DebugView.st	Wed Mar 06 12:49:44 1996 +0100
+++ b/DebugView.st	Wed Mar 06 18:06:54 1996 +0100
@@ -2211,7 +2211,8 @@
                 self doContinue
             ]
         ].
-        self halt:'should not be reached'.
+        'DEBUGGER: OOPS - non regular debugView closing' infoPrintNL.
+        DebugView newDebugger.
     ].
 
     "
@@ -2235,7 +2236,7 @@
 
     super destroy    "/ 1.12.94
 
-    "Modified: 27.2.1996 / 14:29:14 / cg"
+    "Modified: 6.3.1996 / 17:43:54 / cg"
 !
 
 showSelection:lineNr
@@ -2477,5 +2478,5 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.70 1996-03-04 20:33:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.71 1996-03-06 17:06:54 cg Exp $'
 ! !