use anonymous variable

diff --git a/src/lib/builtins.pl b/src/lib/builtins.pl
index eace0865200299738b004b8ceeba4754310d6bc2..e3bd22a6f52f0daf98ce6c7dfbe8aa5f6b989c35 100644 (file)
--- a/src/lib/builtins.pl
+++ b/src/lib/builtins.pl
@@ -954,7 +954,7 @@ retract_module_clause(Head, Body, Module) :-
     ).
 
 
-first_match_index([Clause | Clauses], Clause, N, N) :-
+first_match_index([Clause | _], Clause, N, N) :-
     !.
 first_match_index([_ | Clauses], Clause, N0, N) :-
     N1 is N0 + 1,