X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=adoc%2Fp_lessthan.adoc;h=99a0dff879351e8c9262669de39fd49f207d87d5;hb=d5613f1ba2ae4065d60df8e768027f437f740a7f;hp=ce86406b0c355f2e50e4b5b67b559b5cc5b33115;hpb=b7da3f7bbd1cb10241163abdb950472e539e796d;p=rrq%2Frrqforth.git diff --git a/adoc/p_lessthan.adoc b/adoc/p_lessthan.adoc index ce86406..99a0dff 100644 --- a/adoc/p_lessthan.adoc +++ b/adoc/p_lessthan.adoc @@ -1,9 +1,13 @@ +// logic.asm: WORD p_lessthan, '<',fasm + anchor:p_lessthan[] -Word: < -------- +=== Word: < ----- -logic.asm: WORD p_lessthan, '<',fasm ----- +.... +Data stack: ( v1 v2 -- 0/-1 ) +.... +"<" is a function word that replaces a pair of values with -1 if the +first, v1, is less than the second, v1, otherwise 0. To that end, the +values are 64-bit signed integers.