From f38c2a1502648b0be16fc2e984420886cf64cdee Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sat, 10 Apr 2021 22:38:02 -0700 Subject: . --- shell/evaluate.mu | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'shell/evaluate.mu') diff --git a/shell/evaluate.mu b/shell/evaluate.mu index ba13b494..62e5f885 100644 --- a/shell/evaluate.mu +++ b/shell/evaluate.mu @@ -545,7 +545,7 @@ fn test-lookup-symbol-in-globals { var result-type/edx: (addr int) <- get result, type check-ints-equal *result-type, 4/primitive-function, "F - test-lookup-symbol-in-globals/0" var result-value/eax: (addr int) <- get result, index-data - check-ints-equal *result-value, 1/add, "F - test-lookup-symbol-in-globals/1" + check-ints-equal *result-value, 2/add, "F - test-lookup-symbol-in-globals/1" } fn car _in: (addr cell), out: (addr handle cell), trace: (addr trace) { @@ -827,7 +827,7 @@ fn test-evaluate-primitive-function { var result-type/edx: (addr int) <- get result, type check-ints-equal *result-type, 4/primitive-function, "F - test-evaluate-primitive-function/0" var result-value/eax: (addr int) <- get result, index-data - check-ints-equal *result-value, 1/add, "F - test-evaluate-primitive-function/1" + check-ints-equal *result-value, 2/add, "F - test-evaluate-primitive-function/1" } fn test-evaluate-primitive-function-call { -- cgit 1.4.1-2-gfad0