about summary refs log tree commit diff stats
path: root/shell
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2021-08-02 10:27:58 -0700
committerKartik K. Agaram <vc@akkartik.com>2021-08-02 10:27:58 -0700
commit19d2e6423a1a4e7f303b53f1c550cf6a60e36fe8 (patch)
tree52a20c4edd11431e2df44191824c6a863b1a2e54 /shell
parent4692c48f404a1fa48047924abfdbb74b7e5aafe2 (diff)
downloadmu-19d2e6423a1a4e7f303b53f1c550cf6a60e36fe8.tar.gz
.
Diffstat (limited to 'shell')
-rw-r--r--shell/evaluate.mu4
1 files changed, 4 insertions, 0 deletions
diff --git a/shell/evaluate.mu b/shell/evaluate.mu
index c78f1e23..c870782d 100644
--- a/shell/evaluate.mu
+++ b/shell/evaluate.mu
@@ -15,7 +15,11 @@ fn evaluate _in-ah: (addr handle cell), _out-ah: (addr handle cell), env-h: (han
     var running-tests?/eax: boolean <- running-tests?
     compare running-tests?, 0/false
     break-if-!=
+    var old-x/eax: int <- copy 0
+    var old-y/ecx: int <- copy 0
+    old-x, old-y <- cursor-position 0/screen
     show-stack-state
+    set-cursor-position 0/screen, old-x, old-y
   }
   # show intermediate progress on screen if necessary
   # treat input at the real keyboard as interrupting