diff --git a/doc/Glossary-Concise.txt b/doc/Glossary-Concise.txt index 0a3984f..f4ce1dc 100644 --- a/doc/Glossary-Concise.txt +++ b/doc/Glossary-Concise.txt @@ -1075,6 +1075,12 @@ Compare n1 and n2. Return `TRUE` if n1 is less than n2, or `FALSE` otherwise. lteq? D: nn-f A: - F: - Compare n1 and n2. Return `TRUE` if n1 is less than or equal to n2, or `FALSE` otherwise. +mem:cell+ D: nnn-n A: - F: - +Return address of next cell. Uses a double cell pointer on the stack. + +mem:fetch-double D: nn-n A: - F: - +Fetch a double cell value from a malloc memory region. + mod D: nm-o A: - F: - Divide `n` by `m` and return the remainder. diff --git a/doc/Glossary-Names-and-Stack.txt b/doc/Glossary-Names-and-Stack.txt index 8c72bf8..0b71f5a 100644 --- a/doc/Glossary-Names-and-Stack.txt +++ b/doc/Glossary-Names-and-Stack.txt @@ -357,6 +357,8 @@ io:unix-syscall D: ...n- A: - F: - listen D: - A: - F: - lt? D: nn-f A: - F: - lteq? D: nn-f A: - F: - +mem:cell+ D: nnn-n A: - F: - +mem:fetch-double D: nn-n A: - F: - mod D: nm-o A: - F: - n:-zero? D: n-f A: - F: - n:MAX D: -n A: - F: - diff --git a/doc/Glossary.html b/doc/Glossary.html index e570a61..77c9380 100644 --- a/doc/Glossary.html +++ b/doc/Glossary.html @@ -2677,6 +2677,20 @@

Compare n1 and n2. Return `TRUE` if n1 is less than or equal to n2, or `FALSE` otherwise.

Class: class:word
Namespace: global
Interface Layer: all
+

mem:cell+

+

Data: nnn-n
+Addr: -
+Float: -

+
+

Return address of next cell. Uses a double cell pointer on the stack.

+
Class: class:word
Namespace: mem
Interface Layer: rre
+

mem:fetch-double

+

Data: nn-n
+Addr: -
+Float: -

+
+

Fetch a double cell value from a malloc memory region.

+
Class: class:word
Namespace: mem
Interface Layer: rre

mod

Data: nm-o
Addr: -
diff --git a/doc/Glossary.txt b/doc/Glossary.txt index 43ab0dc..9620dc3 100644 --- a/doc/Glossary.txt +++ b/doc/Glossary.txt @@ -4146,6 +4146,28 @@ Compare n1 and n2. Return `TRUE` if n1 is less than or equal to n2, or `FALSE` o Class: class:word | Namespace: global | Interface Layer: all ------------------------------------------------------------------------ +mem:cell+ + + Data: nnn-n + Addr: - + Float: - + +Return address of next cell. Uses a double cell pointer on the stack. + +Class: class:word | Namespace: mem | Interface Layer: rre +------------------------------------------------------------------------ + +mem:fetch-double + + Data: nn-n + Addr: - + Float: - + +Fetch a double cell value from a malloc memory region. + +Class: class:word | Namespace: mem | Interface Layer: rre +------------------------------------------------------------------------ + mod Data: nm-o diff --git a/doc/words.tsv b/doc/words.tsv index 2c219f3..994817d 100644 --- a/doc/words.tsv +++ b/doc/words.tsv @@ -357,6 +357,8 @@ io:unix-syscall ...n- - - Trigger a Unix system call. This is not intended to be listen - - - "Run interactive ""listener"" (a REPL)." class:word {n/a} {n/a} global rre lt? nn-f - - Compare n1 and n2. Return `TRUE` if n1 is less than n2, or `FALSE` otherwise. class:primitive {n/a} {n/a} global all lteq? nn-f - - Compare n1 and n2. Return `TRUE` if n1 is less than or equal to n2, or `FALSE` otherwise. class:word {n/a} {n/a} global all +mem:cell+ nnn-n - - Return address of next cell. Uses a double cell pointer on the stack. class:word {n/a} {n/a} mem rre +mem:fetch-double nn-n - - Fetch a double cell value from a malloc memory region. class:word {n/a} {n/a} mem rre mod nm-o - - Divide `n` by `m` and return the remainder. class:word {n/a} {n/a} global all n:-zero? n-f - - Return `TRUE` if number is not zero, or `FALSE` otherwise. class:word {n/a} {n/a} n all n:MAX -n - - Return the maximum value that will fit in a cell. class:word {n/a} {n/a} n all