mason.git: fix for rename.
parent
83f7b31910
commit
527177963e
|
@ -55,7 +55,7 @@ IN: mason.git
|
||||||
] [ rethrow ] if ;
|
] [ rethrow ] if ;
|
||||||
|
|
||||||
: with-process-reader* ( desc encoding quot -- )
|
: with-process-reader* ( desc encoding quot -- )
|
||||||
[ <process-reader*> ] dip swap [ with-input-stream ] dip
|
[ (process-reader) ] dip swap [ with-input-stream ] dip
|
||||||
dup wait-for-process dup { 0 1 } member?
|
dup wait-for-process dup { 0 1 } member?
|
||||||
[ 2drop ] [ process-failed ] if ; inline
|
[ 2drop ] [ process-failed ] if ; inline
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue