improve performance of lower_bound_of_target_clause (#1598)

2023-12-15 00:39:29 -07:00
parent 399b50b4d7
commit 8938331915
2 changed files with 23 additions and 26 deletions
--- a/src/lib/builtins.pl
+++ b/src/lib/builtins.pl
@@ -1238,6 +1238,7 @@ call_retract_helper(Head, Body, P, Module) :-
       ClauseQualifier = builtins
    ;  ClauseQualifier = Module
    ),
+    '$debug_hook',
    ClauseQualifier:'$clause'(Head, Body),
    '$get_clause_p'(Head, P, Module).