fix missing variable
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2054 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
b677c030de
commit
2a7d514d3f
@ -48,7 +48,8 @@
|
|||||||
(
|
(
|
||||||
current_predicate(A,M:_)
|
current_predicate(A,M:_)
|
||||||
->
|
->
|
||||||
M = EM
|
M = EM,
|
||||||
|
A = NA
|
||||||
;
|
;
|
||||||
recorded('$import','$import'(EM,M,GA,_,A,_),_),
|
recorded('$import','$import'(EM,M,GA,_,A,_),_),
|
||||||
functor(GA,NA,_)
|
functor(GA,NA,_)
|
||||||
|
Reference in New Issue
Block a user