aboutsummaryrefslogtreecommitdiff
path: root/contrib/interface
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/interface')
-rw-r--r--contrib/interface/blast.ml3
1 files changed, 0 insertions, 3 deletions
diff --git a/contrib/interface/blast.ml b/contrib/interface/blast.ml
index b78aa98453..5fcd04c46a 100644
--- a/contrib/interface/blast.ml
+++ b/contrib/interface/blast.ml
@@ -242,9 +242,6 @@ module MySearchProblem = struct
with e when Logic.catchable_exception e ->
filter_tactics (glls,v) tacl
- let rec list_addn n x l =
- if n = 0 then l else x :: (list_addn (pred n) x l)
-
(* Ordering of states is lexicographic on depth (greatest first) then
number of remaining goals. *)
let compare s s' =