reveal ( word -- )

Vocabulary

words

Inputs

word

a word

Outputs

None

Word description

Adds a newly-created word to the dictionary. Usually this word does not need to be called directly, and is only called as part of create-word.

Definition

USING: accessors assocs kernel vocabs ;

IN: words

: reveal ( word -- )
    dup [ name>> ] [ vocabulary>> ] bi
    [ vocab-words-assoc ] [ no-vocab ] ?unless set-at ;