join-instructions ( bb pred -- )

Vocabulary

compiler.cfg.block-joining

Inputs

bb	an object
pred	an object

Outputs

None

Definition

USING: accessors kernel sequences ;

IN: compiler.cfg.block-joining

: join-instructions ( bb pred -- )
    [ instructions>> ] bi@ dup pop* push-all ;