diff options
Diffstat (limited to 'stdlib.pl')
| -rw-r--r-- | stdlib.pl | 13 |
1 files changed, 10 insertions, 3 deletions
@@ -122,7 +122,8 @@ at_end_of_stream :- current_input(S), stream_property(S, end_of_stream(E)), !, - (E = at ; E = past). + (E = at ; E = past), + !. at_end_of_stream(S_or_a) :- ( atom(S_or_a) @@ -131,7 +132,8 @@ at_end_of_stream(S_or_a) :- ), stream_property(S, end_of_stream(E)), !, - (E = at; E = past). + (E = at; E = past), + !. % Standard exceptions @@ -677,4 +679,9 @@ current_op(Priority, Op_specifier, Operator) :- ), is_atom_or_var(Operator), current_ops(Operators), - member(op(Priority, Op_specifier, Operator), Operators).
\ No newline at end of file + member(op(Priority, Op_specifier, Operator), Operators). + +% Loading prolog text + +consult(File) :- + loader:load_module_from_file(File). |