965f0d3c73d993849cadd6972c7a45c6a92533ca
[rrq/rrqforth.git] / adoc / p_tuck.adoc
1 // stack.asm:   WORD p_tuck, 'TUCK',fasm
2
3 anchor:p_tuck[]
4
5 === Word: TUCK
6
7 ....
8 Data stack ( v1 v2 -- v2 v1 v2 )
9 ....
10
11 "TUCK" is a function word that "inserts" the top cell below the second
12 cell on the data stack.
13
14 ====
15 .Word: TUCK
16 [caption='Definition concept {counter:exec}: ']
17 ----
18 : TUCK SWAP OVER ;
19 ----
20 ====