each-non-phi ( ... bb quot: ( ... insn -- ... ) -- ... )

Vocabulary

compiler.cfg.utilities

Inputs

bb	an object
quot	a quotation with stack effect ( ... insn -- ... )

Outputs

None

Definition

USING: accessors compiler.cfg.instructions kernel sequences ;

IN: compiler.cfg.utilities

: each-non-phi ( ... bb quot: ( ... insn -- ... ) -- ... )
    [ instructions>> ] dip [ [ dup ##phi? [ drop ] ] ] dip
    [ if ] curry compose each ; inline