do-run ( args command-loop -- )

Vocabulary

command-loop.private

Inputs

args	an object
command-loop	an object

Outputs

None

Definition

USING: command-loop io.encodings.utf8 io.files kernel sequences
;

IN: command-loop.private

: do-run ( args command-loop -- )
    [ utf8 file-lines ] dip [ handle-command ] curry each ;