(eval-with-stack) ( str -- )

Vocabulary

eval

Inputs

str

an object

Outputs

None

Definition

USING: combinators combinators.smart io prettyprint ;

IN: eval

: (eval-with-stack) ( str -- )
    parse-string [
        output>array flush
        [ datastack. flush ] with-output>error
    ] ( quot -- ) call-effect ;