emit-loop ( block #recursive -- block' )
Final stage of compilation generates machine code from dataflow IR

Prev:	emit-trivial-if ( -- )
Next:	emit-recursive ( block #recursive -- block' )

Vocabulary
compiler.cfg.builder

Inputs

block	an object
#recursive	an object

Outputs

block'

an object

Definition

USING: accessors assocs compiler.cfg.builder.blocks
compiler.cfg.instructions kernel namespaces ;

IN: compiler.cfg.builder

: emit-loop ( block #recursive -- block' )
    ##branch, [ begin-basic-block ] dip
    [ label>> id>> loops get set-at ] [ child>> emit-nodes ] 2bi
    ;