diff options
| author |  Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2015-12-08 23:34:38 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2015-12-09 01:15:26 +0100 |
| commit | 5c5b5906426f38323fc5d63f4dc634672ebd2649 (patch) | |
| tree | dd157b1da42f4dcf7b0c3778ef71a7f4ec34db21 /proofs/proofview.mli | |
| parent | 19ea51a4b7f7debbe5bdeb2b2689cddadd9876f4 (diff) | |
Adding an unshelve tactical.
This tactical is inspired by discussions on the Coq-club list. For now
it is still undocumented, and there is room left for design issues.
Diffstat (limited to 'proofs/proofview.mli')
| -rw-r--r-- | proofs/proofview.mli | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/proofs/proofview.mli b/proofs/proofview.mli index 927df33a0..659b783cb 100644 --- a/proofs/proofview.mli +++ b/proofs/proofview.mli @@ -303,6 +303,10 @@ val guard_no_unifiable : unit tactic goals of p *) val unshelve : Goal.goal list -> proofview -> proofview +(** [with_shelf tac] executes [tac] and returns its result together with the set + of goals shelved by [tac]. The current shelf is unchanged. *) +val with_shelf : 'a tactic -> (Goal.goal list * 'a) tactic + (** If [n] is positive, [cycle n] puts the [n] first goal last. If [n] is negative, then it puts the [n] last goals first.*) val cycle : int -> unit tactic |