with-methods ( word quot -- )


Vocabulary
multi-methods

Inputs
wordan object
quotan object


Outputs
None

Definition
USING: kernel words ;

IN: multi-methods

: with-methods ( word quot -- )
over [ [ "multi-methods" word-prop ] dip call ] dip
update-generic ; inline