X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=adoc%2Fp_0equal.adoc;h=8e5379c507ca117fbd301d3502bab0731a3d7444;hb=39427aee877cab09feea798b146e06dc7bfc25cc;hp=63980d4b338782703cb3c1ada8eb65346a2870d5;hpb=b7da3f7bbd1cb10241163abdb950472e539e796d;p=rrq%2Frrqforth.git diff --git a/adoc/p_0equal.adoc b/adoc/p_0equal.adoc index 63980d4..8e5379c 100644 --- a/adoc/p_0equal.adoc +++ b/adoc/p_0equal.adoc @@ -1,9 +1,16 @@ +// logic.asm: WORD p_0equal, '0=',fasm + anchor:p_0equal[] -Word: 0= ----------- +=== Word: 0= + +.... +Data stack: ( v -- 0/-1 ) +.... + ----- -logic.asm: WORD p_0equal, '0=',fasm ----- +"0=" is a function word that replaces a value with its logical +complement; the result is zero if the value non-zero, and the result +is non-zero if the value is zero. +This is the same function as <>.