diff options
Diffstat (limited to 'shell/environment.mu')
-rw-r--r-- | shell/environment.mu | 6 |
1 files changed, 3 insertions, 3 deletions
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 |