fix add_predicate_declaration bug not correctly identifying lists of predicate indica...

diff --git a/src/loader.pl b/src/loader.pl
index 513caafd788d31926a342476d8a7d41acca1f241..467644e063f0692c63ac817f2721d9ff044840e3 100644 (file)
--- a/src/loader.pl
+++ b/src/loader.pl
@@ -411,7 +411,7 @@ add_predicate_declaration(Handler, Module:Name/Arity) :-
     predicate_indicator(Name/Arity),
     call(Handler, Module, Name, Arity).
 add_predicate_declaration(Handler, [PI|PIs]) :-
-    '$skip_max_list'(_, -1, PIs, Tail),
+    '$skip_max_list'(_, _, PIs, Tail),
     (  Tail == [],
        maplist(loader:predicate_indicator, PIs) ->
        maplist(loader:add_predicate_declaration(Handler), [PI|PIs])