aboutsummaryrefslogtreecommitdiffhomepage
path: root/proofs/goal.mli
diff options
context:
space:
mode:
authorGravatar Hugo Herbelin <Hugo.Herbelin@inria.fr>2014-08-21 12:23:06 +0200
committerGravatar Hugo Herbelin <Hugo.Herbelin@inria.fr>2014-09-12 10:47:28 +0200
commitd542746c848d4795d4af97874a30fa5e98c8a6b2 (patch)
treefb9c4e64abbe558f7b217c9f9b5c513ad78095ac /proofs/goal.mli
parentb006f10e7d591417844ffa1f04eeb926d6092d7b (diff)
Use evar name to print goal.
Diffstat (limited to 'proofs/goal.mli')
-rw-r--r--proofs/goal.mli2
1 files changed, 2 insertions, 0 deletions
diff --git a/proofs/goal.mli b/proofs/goal.mli
index 4d3361b0e..4b85ec20b 100644
--- a/proofs/goal.mli
+++ b/proofs/goal.mli
@@ -25,6 +25,8 @@ val get_by_uid : string -> goal
(* Debugging help *)
val pr_goal : goal -> Pp.std_ppcmds
+val goal_ident : Evd.evar_map -> goal -> Names.Id.t
+
(* [advance sigma g] returns [Some g'] if [g'] is undefined and
is the current avatar of [g] (for instance [g] was changed by [clear]
into [g']). It returns [None] if [g] has been (partially) solved. *)