methods-with-default ( engine -- assoc )

Vocabulary

generic.single

Inputs

engine

an object

Outputs

assoc

an object

Definition

USING: accessors assocs kernel words ;

IN: generic.single

: methods-with-default ( engine -- assoc )
    [ methods>> clone ] [ next-predicate-engine ] bi
    object bootstrap-word pick set-at ;