load-source ( vocab -- )

Vocabulary

vocabs.loader.private

Inputs

vocab

a vocabulary specifier

Outputs

None

Word description

Loads a vocabulary's source code.

Definition

USING: accessors combinators continuations kernel make
namespaces parser vocabs vocabs.loader words ;

IN: vocabs.loader.private

: load-source ( vocab -- )
    dup check-vocab-hook get ( vocab -- ) call-effect [
        f >>main +parsing+ >>source-loaded?
        dup vocab-source-path [ parse-file ] [ [ ] ] if*
        [ +parsing+ >>source-loaded? ] dip
        [ % ] [ ( -- ) call-effect ] if-bootstrapping
        +done+ >>source-loaded? load-conditional-requires
    ] [ ] [ f >>source-loaded? ] cleanup ;