rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix at_end_of_stream/1 (#479)

Browse Source
This commit is contained in:
Mark Thom
2020-05-10 16:06:15 -06:00
parent 56efb4ffba
commit d1d36f9af0
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/prolog/lib/builtins.pl
View File

@@ -1307,12 +1307,11 @@ stream_property(S, P) :-
at_end_of_stream(S_or_a) :- at_end_of_stream(S_or_a) :-
( atom(S_or_a) -> ( atom(S_or_a) ->
stream_property(S, alias(A)) stream_property(S, alias(S_or_a))
; S = S_or_a ; S = S_or_a
), ),
stream_property(S, end_of_stream(E)), stream_property(S, end_of_stream(E)),
!, ( E = at -> true ; E = past ).
( E = at ; E = past ).
at_end_of_stream :- at_end_of_stream :-
current_input(S), current_input(S),