canonicalize-specializers ( methods -- methods' hooks )


Vocabulary
multi-methods

Inputs
methodsan object


Outputs
methods'an object
hooksan object


Definition
USING: assocs kernel math namespaces sequences sorting ;

IN: multi-methods

: canonicalize-specializers ( methods -- methods' hooks )
[
[ [ canonicalize-specializer-0 ] dip ] assoc-map
0 args set V{ } clone hooks set
[ [ canonicalize-specializer-1 ] dip ] assoc-map hooks
[ sort ] change
[ [ canonicalize-specializer-2 ] dip ] assoc-map
args get hooks get length + total set
[ [ canonicalize-specializer-3 ] dip ] assoc-map
hooks get
] with-scope ;