adoc/p_2dup.adoc

   1 // stack.asm:   WORD p_2dup, '2DUP',fasm
   2
   3 anchor:p_2dup[]
   4
   5 === Word: 2DUP
   6
   7 ....
   8 Data stack: ( v1 v2 -- v1 v2 v1 v2 )
   9 ....
  10
  11 "2DUP" is a function word that duplicates the top 2 cells on the data
  12 stack.
  13
  14 ====
  15 .Word: 2DUP
  16 [caption='Definition concept {counter:exec}: ']
  17 ----
  18 : 2DUP OVER OVER ;
  19 ----
  20 ====