imake sure we use current encoding when opening pipes...
This commit is contained in:
parent
eb79049bdb
commit
68547e1abf
@ -116,7 +116,10 @@ open_pipe_streams(Read, Write) :-
|
|||||||
;
|
;
|
||||||
true
|
true
|
||||||
),
|
),
|
||||||
unix:pipe(Read, Write).
|
unix:pipe(Read, Write),
|
||||||
|
yap_flag(encoding, X),
|
||||||
|
set_stream(Read, encoding(X) ),
|
||||||
|
set_stream(Write, encoding(X) ).
|
||||||
|
|
||||||
fileerrors :- '$swi_set_prolog_flag'(fileerrors, true).
|
fileerrors :- '$swi_set_prolog_flag'(fileerrors, true).
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user