diff options
| author | aspiwack | 2013-11-02 15:39:54 +0000 |
|---|---|---|
| committer | aspiwack | 2013-11-02 15:39:54 +0000 |
| commit | c9504af26647ab745dc22811a2db8058e0b66632 (patch) | |
| tree | 753c2029810002b23946636a3add74aacf86566c /tactics | |
| parent | 8d68ee674daa5deaa327b80e75f01876ef6ea9a0 (diff) | |
Adds a shelve tactic.
The shelve tactic puts all the focused goals out of sight. They can be later recalled by the Unshelve command.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@17013 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/extratactics.ml4 | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/tactics/extratactics.ml4 b/tactics/extratactics.ml4 index 436e3bd5be..44719a9625 100644 --- a/tactics/extratactics.ml4 +++ b/tactics/extratactics.ml4 @@ -803,3 +803,16 @@ VERNAC COMMAND EXTEND GrabEvars => [ Vernacexpr.VtProofStep, Vernacexpr.VtLater ] -> [ Proof_global.simple_with_current_proof (fun _ p -> Proof.V82.grab_evars p) ] END + +(* Shelves all the goals under focus. *) +TACTIC EXTEND shelve +| [ "shelve" ] -> + [ Proofview.shelve ] +END + +(* Command to add every unshelved variables to the focus *) +VERNAC COMMAND EXTEND Unshelve +[ "Unshelve" ] + => [ Vernacexpr.VtProofStep, Vernacexpr.VtLater ] + -> [ Proof_global.simple_with_current_proof (fun _ p -> Proof.unshelve p) ] +END |