run-desc uses default stream
parent
7c921cd073
commit
06f0b0b98f
|
@ -266,4 +266,4 @@ M: object run-pipeline-element
|
||||||
[ ]
|
[ ]
|
||||||
} cond
|
} cond
|
||||||
|
|
||||||
: run-desc ( desc -- result ) utf8 <process-reader> stream-contents but-last ;
|
: run-desc ( desc -- result ) utf8 [ contents [ but-last ] [ f ] if* ] with-process-reader ;
|
Loading…
Reference in New Issue