X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=adoc%2Fp_Ccomma.adoc;h=75992a8f0633d302e3d70f608c966cb90c26ba4f;hb=58fa9b1054af5ce6b2e20ffdd2bf25f5f2355311;hp=0cb190077909cdc9ca30ee902f55d0674bec0029;hpb=b7da3f7bbd1cb10241163abdb950472e539e796d;p=rrq%2Frrqforth.git

diff --git a/adoc/p_Ccomma.adoc b/adoc/p_Ccomma.adoc
index 0cb1900..75992a8 100644
--- a/adoc/p_Ccomma.adoc
+++ b/adoc/p_Ccomma.adoc
@@ -1,20 +1,24 @@
-Word: C,
---------
+// compile.asm:	WORD p_Ccomma,'C,',fasm
+
 anchor:p_Ccomma[]
-----
-compile.asm:	WORD p_Ccomma,'C,',fasm
-----
 
+=== Word: C,
+
+
+....
 Data stack: ( v -- )
+....
 
-"C," is a function word that puts a byte on the heap. It stores the
-least significant byte of the value to the current free heap address,
-and increments that.
+"C," (C-comma) is a function word that puts a byte on the
+<<p_here,HERE>> heap. The least significant byte of the value is put
+at the current free head address, which also is incremented.
 
-.Execution semantics expressed in RRQFORTH
 ====
-: C,
-  HERE @ 1 ALLOT C! ( v -- ; Claim 1 byte and put lsb value there )
-;
+.Definition concept for C,
+****
+: C, HERE @ 1 ALLOT C! ;  ( v -- ; Claim 1 byte and put lsb value there )
+****
 ====
 
+See also <<p_colon,:>>, <<p_comma>>. <<p_here,HERE>>, <<p_get,@>>,
+<<p_allot,ALLOT>>, <<p_Cput,C!>> and <<p_semicolon,;>>.