From 7327016d1543e390117375580b7d5796e8470d82 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Sun, 11 Sep 2022 18:04:07 +0300 Subject: [PATCH] FIXED: sweep_predicates_collection/2: include preds defined in user --- sweep.pl | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/sweep.pl b/sweep.pl index 97241d4..3313d8c 100644 --- a/sweep.pl +++ b/sweep.pl @@ -497,14 +497,20 @@ sweep_predicates_collection(Sub, Preds) :- Tail1), findall(M:F/N, ( xref_defined(SourceId, H, local(_)), - xref_module(SourceId, M), + ( xref_module(SourceId, M) + -> true + ; M = user + ), pi_head(F/N, H) ), Tail1, Tail), findall(M:F/N, ( xref_defined(_, H, imported(SourceId)), - xref_module(SourceId, M), + ( xref_module(SourceId, M) + -> true + ; M = user + ), pi_head(F/N, H) ), Tail), -- 2.39.5