From f630a8cc1ab279c917a348b3953c39719f751ac1 Mon Sep 17 00:00:00 2001 From: Mark Date: Wed, 27 Sep 2023 17:55:15 -0600 Subject: [PATCH] fix add_predicate_declaration bug not correctly identifying lists of predicate indicators (#2049, #2050, #2051, #2052) --- src/loader.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/loader.pl b/src/loader.pl index 513caafd..467644e0 100644 --- 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]) -- 2.54.0