figForth Word - UNTIL
Some parts of this page/site are currently incomplete & will be updated asap
Other parts will change continually so use “Refresh” in your browser !!
There is extensive use of “Tooltips” text to support learning which do
not seem to render on a Smartphone
UNTIL f — (run-time) addr n — (compile) P,C2,L0 Occurs within a colon-definition in the form: BEGIN … UNTIL At run-time, UNTIL controls the conditional branch back to the corresponding BEGIN. If f is false, execution returns to just after. BEGIN; if true, execution continues ahead. At compile-time, UNTIL compiles (0BRANCH) and an offset from HERE to addr. n is used for error tests
NFA: 0073B8 C5 DB 0C5H
0073B9 554E5449 DB "UNTI"
0073BD CC DB 'L'+80H
LFA: 0073BE A273 DW PLOOP-8
CFA: 0073C0 3C28 UNTIL: DW DOCOL
PFA: 0073C2 C367 DC6A DW ONE,QPAIR ; 1 ?PAIRS
0073C6 0B6B DW COMP ; COMPILE
0073C8 DA21 DW ZBRAN ; 0BRANCH
0073CA 4573 DW BACK ; BACK
0073CC 1725 DW SEMIS
xvxcxvxcv
NFA: 0021D0 87 DB 87H
0021D1 30425241 4E43 DB "0BRANC"
0021D7 C8 DB 'H'+80H
LFA: 0021D8 B921 DW BRAN-9
CFA: 0021DA DC21 ZBRAN: DW $+2
PFA: 0021DC E1 POP HL
0021DD 7D LD A,L
0021DE B4 OR H
0021DF 28 E3 JR Z,BRAN1
0021E1 03 INC BC
0021E2 03 INC BC
0021E3 C3 E2 20 JP NEXT