set-slots ( assoc tuple -- )


Vocabulary
classes.tuple

Inputs
assocan assoc
tuplea tuple


Outputs
None

Word description
For each { key value } pair in assoc, sets the key slot in obj to value.

Definition
USING: assocs kernel ;

IN: classes.tuple

: set-slots ( assoc tuple -- )
[ swapd set-slot-named ] curry assoc-each ; inline