eval-interactively ( string -- )

Vocabulary

smalltalk.listener

Inputs

string

an object

Outputs

None

Definition

USING: debugger io kernel smalltalk.ast smalltalk.eval
smalltalk.printer ;

IN: smalltalk.listener

: eval-interactively ( string -- )
    [
        eval-smalltalk dup nil?
        [ drop ] [ "Result: " write smalltalk>string print ] if
    ] curry try ;