1 // control.asm: WORD p_begin,'BEGIN',fasm
8 Data stack: Compiling: ( -- a 0 )
11 "BEGIN" is an immediate function word that is used together with
12 <<p_ifbreak,IFBREAK>>, <<p_ifagain,IFAGAIN>> and <<p_end,END>> to
13 implement structured execution control. BEGIN simply places the
14 address for resolving branches back to this point during execution,
15 and then a 0 as a marker so as to allow for an unknown number of block