no-word-restarted ( restart-value -- word )

Vocabulary

parser

Inputs

restart-value

an object

Outputs

word

an object

Definition

USING: accessors kernel parser.notes sequences vocabs.parser
words ;

IN: parser

: no-word-restarted ( restart-value -- word )
    dup word? [
        dup vocabulary>>
        [ auto-use-vocab ] [
            "Added \"" "\" vocabulary to search path" surround
            note.
        ] bi
    ] [ create-word-in ] if ;