DebugView.st
changeset 5114 d56730e36dac
parent 5110 9bd26b46777d
child 5117 038af0448624
--- a/DebugView.st	Sat Aug 23 19:15:44 2003 +0200
+++ b/DebugView.st	Sat Aug 23 20:10:11 2003 +0200
@@ -1001,6 +1001,12 @@
             ^ 2
         ].
 
+        "/ show the place of the assert; not where the Signal
+        "/ was raised...
+        (sel == #assert:) ifTrue:[
+            ^ 2
+        ].
+
         "/ show the place of the bad index; not where the Signal
         "/ was raised...
         (sel == #notIndexed
@@ -5917,7 +5923,7 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.346 2003-08-22 14:34:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.347 2003-08-23 18:10:11 cg Exp $'
 ! !
 
 DebugView initialize!