fix warning.

This commit is contained in:
Vitor Santos Costa 2014-10-09 10:47:41 +01:00
parent 48053694c7
commit e18f083da6

View File

@ -1345,7 +1345,7 @@ export_list(Module, List) :-
'$do_import'( N/K-N1/K, Mod, ContextMod) :-
functor(G,N,K),
'$follow_import_chain'(Mod,G,M0,G0),
G0=..[N0|Args],
G0=..[_N0|Args],
G1=..[N1|Args],
( '$check_import'(M0,ContextMod,N1,K) ->
( ContextMod = user ->