define-vregs-method ( insn slots word -- )

Vocabulary

compiler.cfg.def-use.private

Inputs

insn	an object
slots	an object
word	an object

Outputs

None

Definition

USING: accessors generic kernel sequences words ;

IN: compiler.cfg.def-use.private

: define-vregs-method ( insn slots word -- )
    [ [ drop ] ] dip [ create-method ] curry
    [ [ [ name>> ] map slot-array-quot ] bi* define ] curry
    if-empty ; inline