Fix mistake in phrase_to_file/2 definition

This commit is contained in:
Adrián Arroyo Calle
2021-11-17 08:36:39 +01:00
parent 8e68626f14
commit 0db2ca6659

View File

@@ -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),