--- a/DebugView.st	Tue Sep 29 12:32:18 1998 +0200
+++ b/DebugView.st	Thu Oct 01 12:52:53 1998 +0200
@@ -2815,7 +2815,8 @@
             "/ the very last one is the startup context
             "/ (in main) - it has nil as receiver and nil as selector
 
-            contextArray last selector isNil ifTrue:[
+            (contextArray notEmpty
+            and:[contextArray last selector isNil]) ifTrue:[
                 contextArray removeLast.
                 text removeLast
             ].
@@ -2861,7 +2862,7 @@
     ^ true
 
     "Created: / 14.12.1995 / 19:10:31 / cg"
-    "Modified: / 2.6.1998 / 14:44:06 / cg"
+    "Modified: / 30.9.1998 / 21:29:07 / cg"
 !
 
 setContextSkippingInterruptContexts:aContext
@@ -3877,6 +3878,6 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.216 1998-09-08 11:07:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.217 1998-10-01 10:52:53 cg Exp $'
 ! !
 DebugView initialize!