eval-in-context ( lines in usings/f -- )

Vocabulary

fuel.eval

Inputs

lines	an object
in	an object
usings/f	an object

Outputs

None

Definition

USING: accessors io.streams.string namespaces parser.notes
sequences sets vocabs.parser ;

IN: fuel.eval

: eval-in-context ( lines in usings/f -- )
    begin-eval [
        parser-quiet? on
        [ manifest get search-vocab-names>> members ]
        [ { "fuel" "syntax" "debugger" } prepend ] if-empty
        <manifest> manifest set
        [ eval-usings eval-in eval ] with-string-writer
    ] with-scope end-eval ;