no-current-vocab ( -- vocab )

Vocabulary

vocabs.parser

Error description

Thrown when a new word is defined in a source file that does not have an IN: form.

Definition

USING: continuations kernel ;

IN: vocabs.parser

: no-current-vocab ( -- vocab )
    no-current-vocab-error boa
    { { "Define words in scratchpad vocabulary" "scratchpad" } }
    throw-restarts dup set-current-vocab ;