diff options
| author | Pierre-Marie Pédrot | 2016-03-05 20:08:33 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2016-03-05 20:09:58 +0100 |
| commit | 70e0d022333e0fc9e06b582f6831cbc698959cf0 (patch) | |
| tree | 91987abbeb9eb9ac1c26674740412550b80b19bd /theories/Program | |
| parent | ebaa67508ec9f59f95e5b68bfece6228e2024ce5 (diff) | |
| parent | 18a5eb4ecfcb7c2fbb315719c09e3d5fc0a3574e (diff) | |
Generalizing the uses of tactic scopes everywhere.
This feature allows the user to write "let x := open_constr(foo) in ..." for instance
without having to resort to tactic notations. Some changes have been introduced in
the parsing of ad-hoc argument scopes, e.g. one has to put parentheses around
constr:(...) and ltac:(...) in tactics. This breaks badly written scripts, although
it is easy to be forward-compatible by preemptively putting thoses parentheses.
Diffstat (limited to 'theories/Program')
| -rw-r--r-- | theories/Program/Equality.v | 4 | ||||
| -rw-r--r-- | theories/Program/Tactics.v | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/theories/Program/Equality.v b/theories/Program/Equality.v index 27e1ca8444..17f05c5113 100644 --- a/theories/Program/Equality.v +++ b/theories/Program/Equality.v @@ -238,8 +238,8 @@ Ltac inject_left H := Ltac inject_right H := progress (inversion H ; subst_right_no_fail ; clear_dups) ; clear H. -Ltac autoinjections_left := repeat autoinjection ltac:inject_left. -Ltac autoinjections_right := repeat autoinjection ltac:inject_right. +Ltac autoinjections_left := repeat autoinjection ltac:(inject_left). +Ltac autoinjections_right := repeat autoinjection ltac:(inject_right). Ltac simpl_depind := subst_no_fail ; autoinjections ; try discriminates ; simpl_JMeq ; simpl_existTs ; simplify_IH_hyps. diff --git a/theories/Program/Tactics.v b/theories/Program/Tactics.v index 66ca3e577d..7384790dae 100644 --- a/theories/Program/Tactics.v +++ b/theories/Program/Tactics.v @@ -252,7 +252,7 @@ Ltac autoinjection tac := Ltac inject H := progress (inversion H ; subst*; clear_dups) ; clear H. -Ltac autoinjections := repeat (clear_dups ; autoinjection ltac:inject). +Ltac autoinjections := repeat (clear_dups ; autoinjection ltac:(inject)). (** Destruct an hypothesis by first copying it to avoid dependencies. *) |