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

fix stupid module bug I introduced yesterday :( 

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2100 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2008-02-14 16:22:42 +00:00
parent ca67a28a0c
commit 88bb8c81aa
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pl/modules.yap
View File

@ -243,7 +243,7 @@ module(N) :-
% current module for predicate
% head variables.
'$module_expansion'(V,call(G),call(G),_M,MM,_TM,_,MT) :- var(V), !,
(MT = on -> G = MM:V ; G = V).
(MT = on -> G = V ; G = MM:V).
'$module_expansion'((A,B),(A1,B1),(AO,BO),M,MM,TM,HVars,MT) :- !,
'$module_expansion'(A,A1,AO,M,MM,TM,HVars,MT),
'$module_expansion'(B,B1,BO,M,MM,TM,HVars,MT).