figForth Word - THEN
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
ENDIF addr n — (compile) P,CO,L0 Occurs in a colon-definition in form: IF … ENDIF IF … ELSE … ENDIF At run-time, ENDIF serves only as the destination of a forward branch from IF or ELSE. It marks the conclusion of the conditional structure. THEN is another name for ENDIF. Both names are supported in fig-FORTH. See also IF and ELSE. At compile-time, ENDIF computes the forward branch offset from addr to HERE and stores it at addr. n is used for error tests
NFA: 007361 C4 DB 0C4H
007362 544845 DB "THE"
007365 CE DB 'N'+80H
LFA: 007366 4F73 DW BEGIN-8
CFA: 007368 3C28 THEN: DW DOCOL ; :
PFA: 00736A AD6A DW QCOMP ; ?COMPILE
00736C C767 DC6A DW TWO,QPAIR ; 2 ?PAIRS
007370 0769 DW HERE ; HERE
007372 BD26 DW OVER ; OVER
007374 4B69 DW SUBB ; -
007376 E826 DW SWAP ; SWAP
007378 F027 DW STORE ; !
00737A 1725 DW SEMIS ; ;