Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 08 Oct 1997 15:55:26 +0200
changeset 3009 d74b118b1d70
parent 3008 5b8993e3f852
child 3010 fecaeb40f3dd
*** empty log message ***
MiniDebug.st file | annotate | diff | comparison | revisions
MiniDebugger.st file | annotate | diff | comparison | revisions 
--- a/MiniDebug.st	Wed Oct 08 13:28:28 1997 +0200
+++ b/MiniDebug.st	Wed Oct 08 15:55:26 1997 +0200
@@ -349,6 +349,12 @@
 "/          ]
         ].
         context := nil.
+	(cmd == $u) ifTrue:[
+            stepping := false.
+            tracing := false.
+	    Processor activeProcess vmTrace:false.
+	].
+
         (cmd == $c) ifTrue:[valid := true. done := true].
         (cmd == $s) ifTrue:[valid := true. done := true].
         (cmd == $t) ifTrue:[valid := true. done := true].
@@ -508,5 +514,5 @@
 !MiniDebugger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/MiniDebug.st,v 1.33 1997-08-11 14:06:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/MiniDebug.st,v 1.34 1997-10-08 13:55:26 cg Exp $'
 ! !
--- a/MiniDebugger.st	Wed Oct 08 13:28:28 1997 +0200
+++ b/MiniDebugger.st	Wed Oct 08 15:55:26 1997 +0200
@@ -349,6 +349,12 @@
 "/          ]
         ].
         context := nil.
+	(cmd == $u) ifTrue:[
+            stepping := false.
+            tracing := false.
+	    Processor activeProcess vmTrace:false.
+	].
+
         (cmd == $c) ifTrue:[valid := true. done := true].
         (cmd == $s) ifTrue:[valid := true. done := true].
         (cmd == $t) ifTrue:[valid := true. done := true].
@@ -508,5 +514,5 @@
 !MiniDebugger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.33 1997-08-11 14:06:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.34 1997-10-08 13:55:26 cg Exp $'
 ! !
hg/stx-libbasic