X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=adoc%2Fp_unequal.adoc;h=640c2a6f1c5cbf70b2d3a48596a4c9d1b4385992;hb=46336a44b2da0ba4f141665e2709885b7b85d566;hp=2a1791dbaecbb1b344226e81bb14941e189c03ec;hpb=b7da3f7bbd1cb10241163abdb950472e539e796d;p=rrq%2Frrqforth.git diff --git a/adoc/p_unequal.adoc b/adoc/p_unequal.adoc index 2a1791d..640c2a6 100644 --- a/adoc/p_unequal.adoc +++ b/adoc/p_unequal.adoc @@ -1,9 +1,12 @@ +// logic.asm: WORD p_unequal, '!=',fasm + anchor:p_unequal[] -Word: != ----------- +=== Word: != ----- -logic.asm: WORD p_unequal, '!=',fasm ----- +.... +Data stack: ( v1 v2 -- 0/-1 ) +.... +"!=" is a function word that replaces a pair of values with -1 of the +values are unequal, and 0 otherwise.