X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=adoc%2Fp_pick.adoc;h=32f76b24428f0645d201989d9703c8c72b37eb46;hb=f38c72b71edee9d23d958a1af73f843b5d44ccbe;hp=8f0376f4fd5d94661c70bc893318dad34ee11e74;hpb=b7da3f7bbd1cb10241163abdb950472e539e796d;p=rrq%2Frrqforth.git diff --git a/adoc/p_pick.adoc b/adoc/p_pick.adoc index 8f0376f..32f76b2 100644 --- a/adoc/p_pick.adoc +++ b/adoc/p_pick.adoc @@ -1,9 +1,16 @@ +// stack.asm: WORD p_pick, 'PICK',fasm + anchor:p_pick[] -Word: PICK ----------- +=== Word: PICK + +.... +Data stack: ( vu...v1 v0 u -- vu...v1 v0 vu ) +.... + +"PICK" is a function word that pushes the u:th data stack cell down +from top onto the data stack. 0 indicates the top cell making it the +same as <>, and 1 indicates the second top cell making it +the same as <>. ----- -stack.asm: WORD p_pick, 'PICK',fasm -----