X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=reference.html;h=a1de89cbf7de1fde99526c0439f3bba94bdd8a81;hb=dca1b940cf2dbf0abca42ed9782013e5b3689ee1;hp=7b6cb8a76ba03b4ffab29e3c1afa8e80369db11c;hpb=b49fed131d5a7806d0737bdc6f9b693c64753cf2;p=rrq%2Frrqforth.git diff --git a/reference.html b/reference.html index 7b6cb8a..a1de89c 100644 --- a/reference.html +++ b/reference.html @@ -801,6 +801,7 @@ asciidoc.install(); BEGIN   BREAK  

CFA>FLAGS@   +CFA>TFA   CLEAR-STREAM   CREATE   CURRENT-WORDLIST  

@@ -1134,6 +1135,26 @@ at the current free head address, which also is incremented.

_______________________________________________________
+

+ +
+

Word: CFA>TFA

+
+
+
Data stack: ( cfa -- tfa )
+
+

"CFA>TFA" is a function word that pushes word tfa of the given cfa.

+
+
+
+
+
Definition concept for CFA>TFA
+

: CFA>TFA 14 - @ ;

+
+
+
+_______________________________________________________ +

@@ -3554,7 +3575,7 @@ is deepest.