are-copies-of ( vals copies -- )

Vocabulary

compiler.tree.propagation.copy

Inputs

vals	an object
copies	an object

Outputs

None

Definition

USING: assocs namespaces sequences ;

IN: compiler.tree.propagation.copy

: are-copies-of ( vals copies -- )
    copies get '[ _ set-at ] 2each ;