diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-08-02 09:30:30 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2014-08-05 19:52:21 +0200 |
| commit | 0e6facc70506d81e765c5a0be241a77bc7b22b85 (patch) | |
| tree | ba0f92d3bf019d5cbf4c72b2f2b667457052f179 /plugins | |
| parent | f9517286637fd0891a3ac1aac041b437e157f756 (diff) | |
Adding a syntax "enough" for the variant of "assert" with the order of
subgoals and the role of the "by tac" clause swapped.
Diffstat (limited to 'plugins')
| -rw-r--r-- | plugins/decl_mode/decl_proof_instr.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/decl_mode/decl_proof_instr.ml b/plugins/decl_mode/decl_proof_instr.ml index c230a9896..4218286b0 100644 --- a/plugins/decl_mode/decl_proof_instr.ml +++ b/plugins/decl_mode/decl_proof_instr.ml @@ -735,7 +735,7 @@ let consider_tac c hyps gls = | _ -> let id = pf_get_new_id (Id.of_string "_tmp") gls in tclTHEN - (Proofview.V82.of_tactic (forward None (Some (Loc.ghost, IntroIdentifier id)) c)) + (Proofview.V82.of_tactic (forward true None (Some (Loc.ghost, IntroIdentifier id)) c)) (consider_match false [] [id] hyps) gls |