?handle-command ( args command-loop -- )

Vocabulary

command-loop.private

Inputs

args	an object
command-loop	an object

Outputs

None

Definition

USING: command-loop continuations debugger io kernel sequences ;

IN: command-loop.private

: ?handle-command ( args command-loop -- )
    [ handle-command ] curry
    [ [ "ERROR: " write print-error drop ] recover ] curry
    unless-empty ;