X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=adoc%2Fp_get_n_decrement.adoc;h=9f22ca3dcf8e25fcae46e6dba01cf2142cf7afee;hb=ef492db3b89ae7e0fe6317d3a1d0e727c28bf8ca;hp=b41909901ed520cbc27128cf87952162b3366d31;hpb=bf67023324b2a0c5723dd3167ef757209ba62e01;p=rrq%2Frrqforth.git diff --git a/adoc/p_get_n_decrement.adoc b/adoc/p_get_n_decrement.adoc index b419099..9f22ca3 100644 --- a/adoc/p_get_n_decrement.adoc +++ b/adoc/p_get_n_decrement.adoc @@ -12,9 +12,8 @@ Data stack: ( a n -- v ) then decrements the cell at that address by n. ==== -.Word: @n++ -[caption='Defintion concept {counter:exec}'] ----- +.Defintion concept for @n++ +**** : @n++ OVER @ DUP ROT - ROT ! ; ----- +**** ====