X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=adoc%2Fp_decimal.adoc;h=292565393e2de44081f827b027c9a34e3bb77894;hb=5ccf8e25e065ee91cb4cdfe962012221e801df6d;hp=df737ee72a4bb5417652bd3e43cb1894e28311bc;hpb=b7da3f7bbd1cb10241163abdb950472e539e796d;p=rrq%2Frrqforth.git diff --git a/adoc/p_decimal.adoc b/adoc/p_decimal.adoc index df737ee..2925653 100644 --- 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 <> to 10. + +==== +.Definition concept for DECIMAL +**** +: DECIMAL 10 BASE ! ; +**** +====