From 02dd160233adc784eac732d97a88356d1f0eaf9b Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Fri, 25 Nov 2016 18:34:53 +0100
Subject: Removing various compatibility layers of tactics.

---
 engine/evd.ml | 7 -------
 1 file changed, 7 deletions(-)

(limited to 'engine/evd.ml')

diff --git a/engine/evd.ml b/engine/evd.ml
index 9c05c6c028..6380e3fc1f 100644
--- a/engine/evd.ml
+++ b/engine/evd.ml
@@ -729,13 +729,6 @@ let loc_of_conv_pb evd (pbty,env,t1,t2) =
 
 (* excluding defined evars *)
 
-let evar_list c =
-  let rec evrec acc c =
-    match kind_of_term c with
-    | Evar (evk, _ as ev) -> ev :: acc
-    | _ -> Term.fold_constr evrec acc c in
-  evrec [] c
-
 let evars_of_term c =
   let rec evrec acc c =
     match kind_of_term c with
-- 
cgit v1.2.3