From d605ba1f9ab08ead61a73f2f102fd8741b4c0352 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Fri, 7 May 2021 11:56:43 -0700 Subject: clean up chessboard We still benefit from some helpers here because of the unrolling and multiple calls to helpers. --- shell/evaluate.mu | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'shell/evaluate.mu') diff --git a/shell/evaluate.mu b/shell/evaluate.mu index eb0b1e42..5e0122b0 100644 --- a/shell/evaluate.mu +++ b/shell/evaluate.mu @@ -474,11 +474,13 @@ fn evaluate _in-ah: (addr handle cell), _out-ah: (addr handle cell), env-h: (han debug-print "B", 4/fg, 0xc5/bg=blue-bg # a trip wire in case we're running without a trace (e.g. when loading the initial state from disk) { + compare trace, 0 + break-if-!= var left-out/eax: (addr cell) <- lookup *left-out-ah compare left-out, 0 { break-if-!= - abort "unknown variable" + abort "error in eval-list" } } # -- cgit 1.4.1-2-gfad0