From 3e2887bbcba6846ce3a18898fcfebe48632b72b9 Mon Sep 17 00:00:00 2001
From: Hugo Herbelin
Date: Mon, 26 Feb 2018 18:31:32 +0100
Subject: Adding informative variant of shelve_unifiable returning set of
 shelved evars.

---
 engine/proofview.mli | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'engine/proofview.mli')

diff --git a/engine/proofview.mli b/engine/proofview.mli
index e7be665527..804f1543d0 100644
--- a/engine/proofview.mli
+++ b/engine/proofview.mli
@@ -326,6 +326,9 @@ val unifiable : Evd.evar_map -> Evar.t -> Evar.t list -> bool
     considered). *)
 val shelve_unifiable : unit tactic
 
+(** Idem but also returns the list of shelved variables *)
+val shelve_unifiable_informative : Evar.t list tactic
+
 (** [guard_no_unifiable] returns the list of unifiable goals if some
     goals are unifiable (see {!shelve_unifiable}) in the current focus. *)
 val guard_no_unifiable : Names.Name.t list option tactic
-- 
cgit v1.2.3