fix possible error in modules.
This commit is contained in:
parent
14d142aa10
commit
9ab7ab0a5e
@ -765,7 +765,7 @@ export_list(Module, List) :-
|
||||
functor(G,N0,K0),
|
||||
G=..[N0|Args],
|
||||
G1=..[N1|Args],
|
||||
recordaifnot('$import','$import'(ModR,Mod,G,G1,N0,K0),_), !,
|
||||
( recordaifnot('$import','$import'(ModR,Mod,G,G1,N0,K0),_) -> true ; true ),
|
||||
'$add_to_imports'(Tab, Mod, ModR).
|
||||
|
||||
% I assume the clause has been processed, so the
|
||||
|
Reference in New Issue
Block a user