diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix warning

Browse Source
This commit is contained in:
Vitor Santos Costa 2016-06-04 23:59:14 +01:00
parent b2cec5467c
commit 42347585d3
1 changed files with 0 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
pl/boot.yap
View File

@ -284,7 +284,6 @@ private(_).
yap_flag( unknown, Action, fail), yap_flag( unknown, Action, fail),
'$handle_error'(Action,G0,M0), '$handle_error'(Action,G0,M0),
clause_location(Call, Caller), clause_location(Call, Caller),
source_module(M),
strip_module(M0:G0,M1,NGoal), strip_module(M0:G0,M1,NGoal),
throw(error(evaluation(undefined,M0:G0), [[g|g(M1:NGoal)],[p|Call],[e|Caller],[h|g(M0:G0)]])). throw(error(evaluation(undefined,M0:G0), [[g|g(M1:NGoal)],[p|Call],[e|Caller],[h|g(M0:G0)]])).
@ -1357,10 +1356,6 @@ bootstrap(F) :-
!, !,
close(Stream). close(Stream).
% '$undefp'([M0|G0], Default) :-
% writeln(M0:G0),
% fail.
'$loop'(Stream,exo) :- '$loop'(Stream,exo) :-
prolog_flag(agc_margin,Old,0), prolog_flag(agc_margin,Old,0),