record-copies ( seq -- )

Vocabulary

compiler.cfg.copy-prop.private

Inputs

seq

an object

Outputs

None

Definition

USING: kernel namespaces sequences ;

IN: compiler.cfg.copy-prop.private

: record-copies ( seq -- )
    copies get [ [ dup ] ] dip [ (record-copy) ] curry compose
    each ; inline