corrected example

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

diff --git a/adoc/p_decimal.adoc b/adoc/p_decimal.adoc
index df737ee72a4bb5417652bd3e43cb1894e28311bc..292565393e2de44081f827b027c9a34e3bb77894 100644 (file)
--- a/adoc/p_decimal.adoc
+++ b/adoc/p_decimal.adoc
@@ -1,8 +1,19 @@
-Word: DECIMAL
--------------
+// compile.asm:        WORD p_decimal,'DECIMAL',fasm
 
 anchor:p_decimal[]
-----
-compile.asm:   WORD p_decimal,'DECIMAL',fasm
-----
 
+=== Word: DECIMAL
+
+
+....
+Data stack: ( -- )
+....
+
+"DECIMAL" is a function word that sets <<p_base,BASE>> to 10.
+
+====
+.Definition concept for DECIMAL
+****
+: DECIMAL 10 BASE ! ;
+****
+====