using IFAGAIN instead
[rrq/rrqforth.git] / adoc / p_2swap.adoc
index 7b0694caf8cb7f68bb4d67730a0d8632f243e689..2c03e4968161ed5654e9af6263bc926c5e03e504 100644 (file)
@@ -1,9 +1,20 @@
+// stack.asm:  WORD p_2swap, '2SWAP',fasm
+
 anchor:p_2swap[]
 
-Word: 2SWAP
-----------
+=== Word: 2SWAP
+
+....
+Data stack: ( v1 v2 v3 v4 -- v3 v4 v1 v2 )
+....
 
-----
-stack.asm:     WORD p_2swap, '2SWAP',fasm
-----
+"2SWAP" is a function word the reorgnizes the top 4 cells swappping
+the upper and lower pair. This is similar to <<p_swap,SWAP>> but
+working with cell pairs rather than single cells.
 
+====
+.Definition concept for 2SWAP
+****
+( v1 v2 v3 v4 -- v3 v4 v1 v2 ) : 2SWAP 3 ROLL 3 ROLL ;
+****
+====