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

protect goal expansion

Browse Source
This commit is contained in:
Vítor Santos Costa 2016-01-31 10:44:20 +00:00
parent 32f6c44dea
commit bd337494f1
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pl/arith.yap
View File

@ -337,7 +337,9 @@ expand_expr(Op, X, Y, O, Q, P) :-
'$do_and'(Z = X, Y = W, E). '$do_and'(Z = X, Y = W, E).
'$goal_expansion_allowed'(phrase(NT,_Xs0,_Xs), Mod). '$goal_expansion_allowed'(phrase(NT,_Xs0,_Xs), Mod) :-
callable(NT),
atom(Mod).
%% contains_illegal_dcgnt(+Term) is semidet. %% contains_illegal_dcgnt(+Term) is semidet.
% %