From 4b5a6f6c30f4c95fc339b54a9d0a70e685b18e7c Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Mon, 19 Jul 2021 20:05:00 -0700 Subject: . --- shell/environment.mu | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'shell/environment.mu') diff --git a/shell/environment.mu b/shell/environment.mu index 51256d02..688590dd 100644 --- a/shell/environment.mu +++ b/shell/environment.mu @@ -285,9 +285,9 @@ fn edit-environment _self: (addr environment), key: grapheme, data-disk: (addr d var curr/ebx: (addr global) <- index global-data, curr-offset var curr-value-ah/eax: (addr handle cell) <- get curr, value var curr-value/eax: (addr cell) <- lookup *curr-value-ah - var curr-type/eax: (addr int) <- get curr-value, type - compare *curr-type, 4/primitive - break-if-!= + var primitive?/eax: boolean <- primitive? curr-value + compare primitive?, 0/false + break-if-= var go-modal-error-ah/eax: (addr handle array byte) <- get self, go-modal-error copy-array-object "sorry, primitives can't be edited yet", go-modal-error-ah return -- cgit 1.4.1-2-gfad0