add-renamings ( old new -- )

Vocabulary

compiler.tree.normalization.renaming

Inputs

old	an object
new	an object

Outputs

None

Definition

USING: assocs kernel namespaces sequences ;

IN: compiler.tree.normalization.renaming

: add-renamings ( old new -- )
    [ rename-values ] dip rename-map get [ set-at ] curry 2each
    ;