* TUCK ( a b -- b a b ) shove the top-value under the value beneath. See >OVER and >NIP simulate: : TUCK SWAP OVER ;
TUCK
( a b -- b a b )
>OVER
>NIP
simulate: : TUCK SWAP OVER ;
core ordinary primitive