fix-class-words ( -- )

Vocabulary

parser

Inputs

None

Outputs

None

Definition

USING: compiler.units kernel namespaces sequences words
words.symbol ;

IN: parser

: fix-class-words ( -- )
    new-definitions get first2 filter-moved
    [ [ reset-generic ] [ define-symbol ] bi ] each ;