summaryrefslogtreecommitdiff
path: root/readme.md
diff options
context:
space:
mode:
authorkitty <nepeta@canaglie.net>2026-03-20 01:49:02 +1100
committerkitty <nepeta@canaglie.net>2026-03-20 01:49:02 +1100
commit0c19ba3275211d20d954102cddc859222e41ae39 (patch)
treec0c46338854d52252b5ef380b9b14f791d17a942 /readme.md
parent3e8972d7ce7859234d13be9e1949295901ac4806 (diff)
import comparisons
Diffstat (limited to 'readme.md')
-rw-r--r--readme.md36
1 files changed, 36 insertions, 0 deletions
diff --git a/readme.md b/readme.md
index f799132..0bc797e 100644
--- a/readme.md
+++ b/readme.md
@@ -77,6 +77,24 @@ end compilation of the currently compiling word.
### `@ ( a -- u )`
fetch the 64 bit value at memory address a.
+### `= ( n1 n2 -- ? )`
+return true if n1 and n2 are equal.
+
+### `< ( n1 n2 -- ? )`
+return true if n1 is less than n2.
+
+### `<= ( n1 n2 -- ? )`
+return true if n1 is less than or equal to n2.
+
+### `<> ( n1 n2 -- ? )`
+return true if n1 and n2 are not equal.
+
+### `> ( n1 n2 -- ? )`
+return true if n1 is greater than n2.
+
+### `>= ( n1 n2 -- ? )`
+return true if n1 is greater than or equal to n2.
+
### `>body ( xt -- a )`
yield the code field of xt.
@@ -87,6 +105,24 @@ in the input buffer.
### `>r ( u -- ) ( R: -- u )`
move a value from the working stack to the return stack.
+### `0= ( n -- ? )`
+return true if n is equal to zero.
+
+### `0< ( n -- ? )`
+return true if n is less than zero.
+
+### `0<= ( n -- ? )`
+return true if n is less than or equal to zero.
+
+### `0<> ( n -- ? )`
+return true if n is not equal to zero.
+
+### `0> ( n -- ? )`
+return true if n is greater than zero.
+
+### `0>= ( n -- ? )`
+return true if n is greater than or equal to zero.
+
### `1+ ( u -- u')`
add one to u.