SHUTDOWN-HOOK:

Vocabulary

syntax

Syntax

SHUTDOWN-HOOK: word/quotation

Word description

Parses a word or a quotation and sets it as the shutdown hook for the current vocabulary.

Definition

USING: accessors init kernel parser quotations sequences
vocabs.parser ;

IN: syntax

SYNTAX: SHUTDOWN-HOOK:
    scan-word dup \ [ =
    [ drop parse-quotation ] [ 1quotation ] if
    current-vocab name>> [ add-shutdown-hook ] 2curry append! ;