diff options
author | aspiwack <aspiwack@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-09-12 10:04:25 +0000 |
---|---|---|
committer | aspiwack <aspiwack@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-09-12 10:04:25 +0000 |
commit | 03b99149b5ab569be43d6cb3d34fb4766931074d (patch) | |
tree | 7a99e224c95c8e4b40372bdcf6880a11ece24799 /proofs/proof.mli | |
parent | 0c0481a2fdea2e5efb30d9cd11563e04c2861077 (diff) |
Adds a new command Show Goal (e.g. Show Goal "42") printing a goal using the uid returned by Goal.uid.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14467 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs/proof.mli')
-rw-r--r-- | proofs/proof.mli | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/proofs/proof.mli b/proofs/proof.mli index 7de0a9fdf..b4c84cbf6 100644 --- a/proofs/proof.mli +++ b/proofs/proof.mli @@ -154,6 +154,11 @@ val run_tactic : Environ.env -> unit Proofview.tactic -> proof -> unit [transaction p f] can be called on an [f] using, itself, [transaction p].*) val transaction : proof -> (unit -> unit) -> unit + +(*** Commands ***) + +val in_proof : proof -> (Evd.evar_map -> 'a) -> 'a + (*** Compatibility layer with <=v8.2 ***) module V82 : sig val subgoals : proof -> Goal.goal list Evd.sigma |