// control.asm:	WORD p_break,'BREAK',fasm,IMMEDIATE

anchor:p_break[]

=== Word: BREAK

"BREAK" is an immediate function word that lays out an unconditional
branch out of an enclosing xef:p_begin[BEGIN]-xref:p_end[END] block.
Similar to xref:p_ifbreak[IFBREAK] it lays out the branch cell
followed by a reserved cell for the branch offset, and inserts the
resolution address just above the required 0 on the data stack.

====
.Usage example {counter:example}: unconditional break with a condition.
----
: WTELL ( tfa -- ; Print word pname )
  24 + DUP 8 + SWAP @ TELL SP EMIT
;

: WORDS ( wordlist -- ; Print all words of word list )
  BEGIN
    @ DUP IF DUP WTELL ELSE BREAK THEN
    1 IFAGAIN
  END
  DROP
  NL EMIT
;
----
====

See also <<p_branch,BRANCH>>, <<p_0branch,0BRANCH>>,
<<p_1branch,1BRANCH>>, <<p_if,IF>>, <<p_else,ELSE>>,
<<p_ifbreak,IFBREAK>> and <<p_ifagain,IFAGAIN>>.