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

fix call(V:_).

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1987 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2007-11-08 16:03:20 +00:00
parent 7b6c96e3d7
commit acba936e61
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pl/arith.yap
View File

@ -84,8 +84,8 @@ do_not_compile_expressions :- set_value('$c_arith',[]).
'$do_and'(R0, Comp, R). '$do_and'(R0, Comp, R).
'$do_c_built_in'(P, _, P). '$do_c_built_in'(P, _, P).
'$do_c_built_metacall'(G1, Mod, call(Mod:G1)) :- '$do_c_built_metacall'(G1, Mod, '$execute_wo_mod'(G1,Mod)) :-
var(G1), var(Mod), !. var(Mod), !.
'$do_c_built_metacall'(G1, Mod, '$execute_in_mod'(G1,Mod)) :- '$do_c_built_metacall'(G1, Mod, '$execute_in_mod'(G1,Mod)) :-
var(G1), atom(Mod), !. var(G1), atom(Mod), !.
'$do_c_built_metacall'(Mod:G1, _, OUT) :- !, '$do_c_built_metacall'(Mod:G1, _, OUT) :- !,