added CFA>TFA

[rrq/rrqforth.git] / adoc / p_nip.adoc

diff --git a/adoc/p_nip.adoc b/adoc/p_nip.adoc
index cc74eb73585ca2ab82e61db927ba2740b985ed96..1f997109152f07c4b73874c873fd7b777e775f39 100644 (file)
--- a/adoc/p_nip.adoc
+++ b/adoc/p_nip.adoc
@@ -1,9 +1,19 @@
+// stack.asm:  WORD p_nip, 'NIP',fasm
+
 anchor:p_nip[]
 
-Word: NIP
-----------
+=== Word: NIP
+
+....
+Data stack: ( v1 v2 -- v2 )
+....
 
-----
-stack.asm:     WORD p_nip, 'NIP',fasm
-----
+"NIP" is a function word that discards the second of the top two cells
+on the data stack.
 
+====
+.Definition concept for NIP
+****
+: NIP SWAP DROP ;
+****
+====