diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2021-06-04 16:07:07 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2021-06-04 16:07:07 -0700 |
commit | bb1ccae27fedf763b46daf027f052cef4706944f (patch) | |
tree | f24fdb8b224532c89e70145d4b09bfce3423b3c9 /shell/global.mu | |
parent | 4bb826b40e514e377938ad6894c04069eb125850 (diff) | |
download | mu-bb1ccae27fedf763b46daf027f052cef4706944f.tar.gz |
rename the definition primitive to 'def'
Diffstat (limited to 'shell/global.mu')
-rw-r--r-- | shell/global.mu | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/shell/global.mu b/shell/global.mu index 3eb1df69..8e3aecce 100644 --- a/shell/global.mu +++ b/shell/global.mu @@ -387,12 +387,12 @@ fn maybe-stash-gap-buffer-to-global _globals: (addr global-table), _definition-a break-if-= return } - # if definition->left is neither "def" nor "set", return + # if definition->left is neither "define" nor "set", return var left-ah/eax: (addr handle cell) <- get definition, left var _left/eax: (addr cell) <- lookup *left-ah var left/ecx: (addr cell) <- copy _left { - var def?/eax: boolean <- symbol-equal? left, "def" + var def?/eax: boolean <- symbol-equal? left, "define" compare def?, 0/false break-if-!= var set?/eax: boolean <- symbol-equal? left, "set" @@ -449,12 +449,12 @@ fn move-gap-buffer-to-global _globals: (addr global-table), _definition-ah: (add break-if-= return } - # if definition->left is neither "def" nor "set", return + # if definition->left is neither "define" nor "set", return var left-ah/eax: (addr handle cell) <- get definition, left var _left/eax: (addr cell) <- lookup *left-ah var left/ecx: (addr cell) <- copy _left { - var def?/eax: boolean <- symbol-equal? left, "def" + var def?/eax: boolean <- symbol-equal? left, "define" compare def?, 0/false break-if-!= var set?/eax: boolean <- symbol-equal? left, "set" |