From d578692bf8e65d9448c48ea8dae7dd6642e03622 Mon Sep 17 00:00:00 2001 From: Ralph Ronnquist Date: Sun, 6 Jun 2021 09:42:15 +1000 Subject: [PATCH] update --- reference.html | 23 ++++++++++++++++++++++- rrqforth | Bin 2150539 -> 2150685 bytes 2 files changed, 22 insertions(+), 1 deletion(-) 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.

diff --git a/rrqforth b/rrqforth index 8f9b0e4cc820d26c0fba0b3b417ceec48ab65a5d..ce1b90b60971d8a657b3f459f6cc090fc17c334b 100755 GIT binary patch delta 7129 zcmZ{odsI|Mn!u}@?xt;2ps^pkLJ>Pbd<9f6aaBOO;c5`t1{B3dt1&S-8KX`zx~mD- zkdASP@qw|}ASe$JQC`W6C?F4c3G#>&&t_w06O-AU(-V&-=1k)37}HyI>nq*EOzICV zx9ayj?pIY`ebt5K1*+1D0@Wd_-Zz$1_M$P+yBM2{Tkk%K&Putzp}dl62meuRQY@MAK7Kj;+LT`+n#u3p$NB2HQ%J%wyh8nDjAB^T zORA4yx2lBr6MSFo*V3#h#_fK7-67YwxTVCcL^mzc$&07g%E0FU}5>*>E`zLRmHVtV{ zD#pooC$QeQ0!ZyiZhIdm2|kInYS$xDYl^jc#{ujD_&TVy=WSh!PMqY6?A?=8ZOaDk z>IooibI8s!i`5a&t%C12mX)RbY$G?#gtcKa$3B9ASJD zkUs*lrh@xAOM#xOV9^Q<3G&Vb?#T*nwOUa{k}9xPwVfQQz+sd0-rMWBz3l+q<;whL zWv+0zP%Fc*u?(PAfRZY?|5+KSE^2Zu}6g-7`9%17` zyv4xv0B1h~PG;Cq&>3ZAnWAY_GJp#@!z~{m!Dna=UCj~mIErWiSq;dipei@hg(`uI zr(A0;cdZh*=vu|3HiPbu+obahjqnaYZUgdit+LttQ&ZBj94L`EYiUG&HH7ts#9Ho8 zQ!R^xMeE9OpgnAS%H;o8$?Zt}8k>(cZ!dK00hzF~N}R{7T#_v<$v}UqRU#b`KaiUz zJriNub5wdpV|)F*Tcv*jfh}kGDvg_u63+4o#AoqDL&90^#7AO$0g@k$Ysf2SvB4k% z^x!O?iTUX2StY*5&S6c+yO)3V`TlZ_{<#XAL^hnm7R~$x$VB4L;mAqv?PSOX`p0yR z+dFcOuipj8&5)RJZW#D4CL5-rfn|c8uOCpsA^N8l#$)QZ;6n5RM-CP<h6ZoiA9)Zxceza{QE{4as+bkcqcBeC^LJwrO`uwHeSjYkE) zr25M%6uAq?&UzO8P@N-X8A`4v8>prTsZe8+3jXGMb&XT%@2jYHBd;!-&tex@UXMd3 z4zRv2vv^+(*;S9DER|pTd@o@t;A4YlV6cnS*W>uWJUW<6`&rxC;4a#(GX>;iWM#XU z-Gm0kE}7ndjk?kXDjh)V4LC+O$o~I=G&JDo$Tkcp8&(ktB+%%qs#6DwXrpu1f&NCxX`4Xh|Eol_p!j#bu z|J`|N^smoCP#{a@f-&7;t}{=*kM=B=@8dUy<@=KZ-zs9Vg?5`>DjaWnCqggz=uG$b zp=PS9=9hGl^XGAJ{v|2?^M4|m%0xGU=;2G;tS~S6#@nPqe%eTduPLXFH$m9x?<-)! zPr&;ws5$=WH@s<*?;8T&`a9irxBAoQr?d7&GvC9HqjSy5bWBkq^b!k?_5xL1xs->e zxt9xk1EqE@dA%7&&7SyopHK3eZ>wctxYZ;bSn$*T@}53_1fhAJ=~)DN4qqap%{V+b z65h{I|5>|CIxf&XlMt#r!5)A-cGlm-5n%HO5!txeg&=cRKZwk4 z!yyxYphMn|9NfJwvbGJc4spWkArPY*i>6F7x!H#G>fB3;cllz&)I;?q-i5b%<*N{i zg@UFRly$>Ki-RlRFY!X3(4SPvzhSsoc}_<6A6A%rK&*;fNCVHe^CcxYTn-f9PEuO1 z*%*0^!}0C>S=Y|XtOu89nf04?B`{j4&{XoDB(@z#t9~L&+i~3F6|{7a_J?IXOe4D& z^N9Th^la+jSCy3XbXvj8=ul$x`13Ft0=GZm;*1V%{r4Sw&SOvkmk1u4EB2B(9r!6j z0SLr*l3#VulIsD-=ZWBnXGy0}%%9?27=8eHN;FC8y#npMjRiQ~t-#pmAV!DK; z7r~OQi|@U~)6pkf)gqy)cgzfnR3gU5M&%Pwxu=V?chYs5N{@T?`^R59vDG&86P*pPZ#~gM01(f zZVg>HB;U-G_xsPiOm}iYKfTB-&?r59|3-VfGeN}{kZ;BLvTB`FxZv~qRCIr!BIX;| z<5zX-Z&bXO^@=0sP7?Q1D%3HTRyZY9pZ7E9)KCjLM4Psoub`~#lxznYz09`nV}?;W z%vxGEIdBrr5oO-2SF+H>1#>yOoVW zlDg^LsHt1o7-UU1)(13oyBUCH_P{Suj>SusrKF=Dxw^=HZ5`bR21fzltl-Sicq zH+p!1Avto<(jLXhh<@!_iU-kA??k|t_P801u94s#nsPrNaXpx*(#Vw_9A%7Iz#aVn zpypnFy$2zewNL`ZdK${17tq?hggZ+mo=KXvwNf^XYAuV&cvCSYm)(Tb{{*ZV}F%a5oc}*qf_hg2Y5_B|a*yra9bt6+ga6Y(23#*Fojx z2Tu`Qu^vQ}?|^yx5K9qeqtlg{=1N(%p8hbHwInkGX@*GERh(kb3~}%4hD2(%)1L@- z4)GF`{qzv96OemD{Og|`qF;aM{}Y#hpm{~PcTyvZGP4{>$bVQ#@iu=*IB&vJcq^V$ zkdua}IG1<0r$5=WwA|dU<`~ z&-5lE_4hgtIw?TU%V9h_Jdui3zxIv%h7Y}VPrCPqZYMZYGs3T)KMd2W=L;jsiDFU)m^+&iDVAS}32zEr>NFG#=Cz^D}$~qjm#D-Bs)hibiP} z8_$FBhuQx)=R_)FhZt*im`%3y5?Mzbbcm%oR^a7YH^Wd%M6&XvYd7*^96ejCT_w%a XkqMCHMZY*`#40e*E86ytaoGO>I{ix6 delta 7146 zcmai&3sh7`n#Ze~SJOmURWL9hiB@fjVHGbfG{lR4L9(Tpd?IqPJ4zpDDmIPAK6&yn`t z`hEZJtNNl(PKacM3(E~hsphpk#=oXJ2?9r_rJ;b9w;nDke^iYr9*Q1Ad^l*=E^XUCNdVh}| z;nD3LJ<_8)JbIKzkM`&>9zE8h5Af&%J$l?>onBdQzMXn>?go0v99uhr5UrD}{HPFq z(kwg@ZEb6qRvfTl1e?BzW}2LA<0hJG>R|^q(aZJ~3`>BCt4X6i7F zV!O7`LU0ho=mYbT#-skFw8hWw-qylRZ6OhC)HWKzzTQfy-M2iCV)=bSDXC@ntk}%T^i`X=ug%3C1+U!?#Jil(lW6QKlC;=jiVnXZ-Cq zQtw3su5%#LFP`k<$bj%e*uD?jhq3H38g2Sf2t>W_SVGptCKxXx^&?U%Ipy$=CuwEu zPvz8Z&o5Z#Fep-KWips%PDKVxNF(bc7M1T?Zh@eF|AGu^9fASdnY)bI117|i%aUY^ zx6=^YI^-@RH+MUGgHgN1mE+8H5xQOYX7$_Ya9cE@bi4H3hLZ6k$%m426y$3rhjHn7 z>H9+jt>w~pax%Flz^I6X1Y;di*O1DUlz(a}q3lLEjgAs7oz4z_G3jSv4dlGl;^Evp0pbNWuvXGgxM2@ZtPcS^VIQZC3nbNaJngG3q3 zj$m8YBI$SolKraDF-#rvbxB6%7r1lXMiHXd5naeGRm0j&%^``^!g)--wzkKj6}yNr z0olZA8NeRSMw{QN<^$-6azUMLx44aO7fSDMA@&o;9R6vMk6_ zTsN_@)w^hvEguo)vTpjJi5pF>?P8|gP^+s2 z9SM~JifeO$46quZxGlS(bdDxH3Q7cMB|<$2y~H-`rcvgk-C|Ut^9!`T2fS`05wWD* zGR9ALi*5uur{$8O-C_-}zBSZp`*MMFT7+O=4I5WV?ZH{DXPkL1a$&bvt^>xmY9sv< zM85wGEiRzNyc)S2#%5;EAcJZ|9PIBkG`N3`F$vj0H8PByHN4+;|FLAnFQC=--Fz9u z3dHW#h-lfkJ=EXaB1xES@zDPYL|YJjdXKE9**V0rM@`FM0OuiS*@IcyBS#<~$k~!) zf80X@ZG8}&jo<|YvtZe5-6Ohhzu!N>IF&Dh+=^Uut*jU6&J5TczJWNJsGa$`sm1yY zB8zL~(B$RJagh<1+G2Lo|%#uWANR0eEIYX8q9k@|y`z9tpy${nmJN}7d;}M(7y7tq!$a`P=d`l=a*73#% zxu~(_039D%2W_`eE%pElKS%8$bFy;tAk0j1b3gA3W%>ac7WnJ|FkZyKYFNhed9S@?X9O4KMQ+H}tgN2PFSfc#6g{(!!BPJb}? z&3RhM3`kf>MuKHstVQ$9NU(rXHCOWc|CAPUsQ{2FYKHUwDzW<*=bx4SLFGHH(t`K@ zXFRR?18d)ZeF_%x_nr3+7xE4f*HO9529bV8MR$jb-Y$Wcl8)Dof^sq{4{4VMrFe!8 zWcFh;?#Vg-<@0HN$qBWZ&p+Y&2JM5C>G-50i125ibB^o$VU~>eugBT?W;it*!TWyD z$gjj>a$%*<$a7_6kh@3Oozv7lp`ogfw-WW6;g=@vPvF3>+gK>>@1o3y$FM|lk@?4j z$cTbA37G`SeaU-eJRk3SWDIOsBMmYik;b!n8?V6=WAEoGGAkael=u-8U(zTeb7juV zBT0?_dt^PmB1>wNk+wI=+LV<+K7#)?(Sg>Fu*uRSo8UlkRW#Xc6#IDk_rEaG!IL(=wN^|TZS@_F&x4fz2&%@RXZ|7O6W8OtHvY19KWPeRap5i47}U~cIXlOYr<>(`D8rWCqu)EFPdCeMU2A5S+G%8nD-(`^ z&gm{v*33KaV81;M<+%*0QO8AYSp9K0Io@w(8@r$mUOP_1Ll+*0j%1|Ejx1w89j6Oy zw_Nh}K3c<+7L^q0XlfofA}5ZEV2jjhT!@E1b+3Yl5fIlkJbaA;XZ(5tC--$+YmeiV zp3?8Zsduha=nN)%(6RbebMgc_I`^5JlbS2XMM^&t(;~d&qOgX0`P-irwa|g)uRaso zLqf#FFMU4v5K#p=(@M-*v7gpCJq)5I^R?n<9nWbW{4-_Ww9s*b`ME(Wj?R5pwIXK7 zf%^)T&$P%R58os6$fg!CYJ<*UYa712s-QQu$arE-$VoAb+>#dIy=&80cK!q%JM5g{RuQ*>g?-+^KqjWr)?<%hl)R@_D-hP3|; zl9TwQRt!5)nq{^rjToz)GChaTuAohBk{M92hP8=pJIXgnTianVCLuZuD{FNd3q1+% z4J+FCBylk3N!l;DFL%)yR1J)_wi8~iQht8GpL7`T#Ar>E-dtF@)z&%xIjtn+3fpj! zMoetsyxQ}0G|)-{c?@&inyJHh6(6p^Kvte)tGlTqkiTrCoa7UFpf%;B%;n*eEY3?E z=C$w~z8NsL7e3Nln<~Rti;$mJCUgDu{^I_In(&3oH(y6sJFdvSda5c zZ`-_Z0vu?50ouUXfX;wASPoW5nejuabom03|LK+Ethw^Zv4{8~!1=N=DiA-0_|#Lf znrF?)oCaSEET_c2&Hi+XzHR!FEog^V_r?_I!E&k)6bKp8E*IL&Eccu|a_5vBmpjDg#o$_rIp+aP5)ZI1lST6{4)eAaiYL7nD7=4u+(}c5R8bj> z_RG;;9cHFtLLL{0;vNl%OQ?=g)KmV|FZzupDuCW2x0Jnhnhu+$jxG=FP)}_i%1q^0 z6~o`*fWCTKtR26n$P{+_G>u%KgnlMzLP`m!Nue^t!d*x`#X?cI| zG+TTIzIS+qoAJtx!c;d8W8&0vFPblAt!LnXKjaKwnvTH%e>um?4F3)v#;1xgbc$R) zL(WKd-ZLz|0S-(PyJ)z14OsEh)1od|>}!zd)5T^Vq4p=T-L9W`jcXouGg8?i}!i-?&)F7w{q&5%uUd4};N$}US>SXTA?}70W6Kpwi zxk^qF`}!Om8Z!db65;iA$e;fX$?t4;uXh7*k_|pjpN!rK^sZIk>F@c-s{7jg%ib0Y z(9V{hhnLQ)Y&?X|vJX;A$W>tZ_3C-~mV4toyycEL&%>vz?**DM>-Xou_vI&L4;IO@ z8QFpZtk$&Z!S}TfH@tE*83XqGO1&WVoWR+0U_%aOZ5Qa2qE#0_`$+`Vlu%mh14_jf z+_9BYeUO4cg`A>bbeeg4&jcCa<0`i}