copy-superclasses-methods ( class engine assoc -- )

Vocabulary

generic.single

Inputs

class	an object
engine	an object
assoc	an object

Outputs

None

Definition

USING: classes kernel sequences ;

IN: generic.single

: copy-superclasses-methods ( class engine assoc -- )
    [ superclasses-of ] 2dip
    [ swapd copy-superclass-methods ] 2curry each ;