try-output-process ( command -- )

Vocabulary

io.launcher

Inputs

command

an object

Outputs

None

Definition

USING: accessors io io.encodings.utf8 io.launcher.private
io.timeouts kernel ;

IN: io.launcher

: try-output-process ( command -- )
    >process +stdout+ >>stderr [ +closed+ or ] change-stdin
    utf8 (process-reader)
    [ [ stream-contents ] [ dup (wait-for-process) ] bi* ]
    with-timeout 0 = [ 2drop ] [ output-process-error ] if ;