about summary refs log tree commit diff stats
path: root/shell/evaluate.mu
diff options
context:
space:
mode:
Diffstat (limited to 'shell/evaluate.mu')
-rw-r--r--shell/evaluate.mu16
1 files changed, 8 insertions, 8 deletions
diff --git a/shell/evaluate.mu b/shell/evaluate.mu
index 403b9d14..6e2f5ad7 100644
--- a/shell/evaluate.mu
+++ b/shell/evaluate.mu
@@ -16,14 +16,6 @@ fn evaluate _in-ah: (addr handle cell), _out-ah: (addr handle cell), env-h: (han
     # if screen-cell exists, we're probably not in a test
     show-stack-state
   }
-  # errors? skip
-  {
-    var error?/eax: boolean <- has-errors? trace
-    compare error?, 0/false
-    break-if-=
-    return
-  }
-  var in-ah/esi: (addr handle cell) <- copy _in-ah
   # show intermediate progress on screen if necessary
   # treat input at the real keyboard as interrupting
   {
@@ -43,6 +35,14 @@ fn evaluate _in-ah: (addr handle cell), _out-ah: (addr handle cell), env-h: (han
     break-if-=
     var y/ecx: int <- render-screen 0/screen, screen-obj, 0x70/xmin, 1/ymin
   }
+  # errors? skip
+  {
+    var error?/eax: boolean <- has-errors? trace
+    compare error?, 0/false
+    break-if-=
+    return
+  }
+  var in-ah/esi: (addr handle cell) <- copy _in-ah
 #?   dump-cell in-ah
 #?   {
 #?     var foo/eax: byte <- read-key 0/keyboard