diff options
Diffstat (limited to 'shell')
| -rw-r--r-- | shell/evaluate.mu | 4 |
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 |