canonicalize-specializer-2 ( specializer -- specializer' )

Vocabulary

multi-methods

Inputs

specializer

an object

Outputs

specializer'

an object

Definition

USING: assocs combinators kernel math namespaces sequences words
;

IN: multi-methods

: canonicalize-specializer-2 ( specializer -- specializer' )
    [
        [
            {
                { [ dup integer? ] [ ] }
                { [ dup word? ] [ hooks get index ] }
            } cond args get +
        ] dip
    ] assoc-map ;