diff options
author | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-06-18 21:42:56 +0000 |
---|---|---|
committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2010-06-18 21:42:56 +0000 |
commit | f149f4d25c3e65dfca08ee912877f6c8e6c2b00a (patch) | |
tree | 4dc2b72a1bde80b511881d7340e37fea4eacf739 /theories/Init/Tactics.v | |
parent | 0c37eb2501f7331dbab6450a4469d6c8885d92f5 (diff) |
clear/revert dependent: restrict to hyp(h) instead of ident(h)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13169 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Init/Tactics.v')
-rw-r--r-- | theories/Init/Tactics.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/theories/Init/Tactics.v b/theories/Init/Tactics.v index 8e1d6d2d8..a92d9b1ef 100644 --- a/theories/Init/Tactics.v +++ b/theories/Init/Tactics.v @@ -210,7 +210,7 @@ Tactic Notation "decide" constr(lemma) "with" constr(H) := (** Clear an hypothesis and its dependencies *) -Tactic Notation "clear" "dependent" ident(h) := +Tactic Notation "clear" "dependent" hyp(h) := let rec depclear h := clear h || match goal with @@ -222,5 +222,5 @@ Tactic Notation "clear" "dependent" ident(h) := (** Revert an hypothesis and its dependencies : this is actually generalize dependent... *) -Tactic Notation "revert" "dependent" ident(h) := +Tactic Notation "revert" "dependent" hyp(h) := generalize dependent h. |