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

retain error context (load/1) when using :- D.

Browse Source
This commit is contained in:
Markus Triska
2026-03-16 07:36:55 +01:00
parent b41563e976
commit 1c9fd1501a
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/toplevel.pl
View File

@@ -222,7 +222,9 @@ expand_op_list([Op | OtherOps], Pri, Spec, [(:- op(Pri, Spec, Op)) | OtherResult
% Implement the include/1 directive via term expansion. % Implement the include/1 directive via term expansion.
user:term_expansion((:- include(File0)), Clauses) :- user:term_expansion((:- Include), Clauses) :-
nonvar(Include),
Include = include(File0),
( si:atom_si(File0) -> ( si:atom_si(File0) ->
atom_chars(File0, File), atom_chars(File0, File),
format("% Warning: include/1: atom arguments are deprecated. Use chars for file paths:~n", []), format("% Warning: include/1: atom arguments are deprecated. Use chars for file paths:~n", []),