Fix mistake in phrase_to_file/2 definition
This commit is contained in:
@@ -12,6 +12,7 @@
|
|||||||
:- module(pio, [phrase_from_file/2,
|
:- module(pio, [phrase_from_file/2,
|
||||||
phrase_from_file/3,
|
phrase_from_file/3,
|
||||||
phrase_to_file/2,
|
phrase_to_file/2,
|
||||||
|
phrase_to_file/3,
|
||||||
phrase_to_stream/2
|
phrase_to_stream/2
|
||||||
]).
|
]).
|
||||||
|
|
||||||
@@ -109,7 +110,7 @@ phrase_to_stream(GRBody, Stream) :-
|
|||||||
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */
|
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */
|
||||||
|
|
||||||
phrase_to_file(GRBody, File) :-
|
phrase_to_file(GRBody, File) :-
|
||||||
phrase_to_file(GRBody, File).
|
phrase_to_file(GRBody, File, []).
|
||||||
|
|
||||||
phrase_to_file(GRBody, File, Options) :-
|
phrase_to_file(GRBody, File, Options) :-
|
||||||
setup_call_cleanup(open(File, write, Stream, Options),
|
setup_call_cleanup(open(File, write, Stream, Options),
|
||||||
|
|||||||
Reference in New Issue
Block a user