diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-12-18 00:09:02 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-12-18 00:09:02 +0000 |
commit | 4c78cf0f68b8eeb040eb2267a3705fc236295f76 (patch) | |
tree | f8057efcb9d6e48926b244bd4cef6f4c7fa329c3 /test-suite/success/set.v | |
parent | 7f5ee6001e4c99d4f75ab5934e3e5c762babb11a (diff) |
Fixed a little inefficiency of "set/destruct" over a pattern. Now
different instances of a meta are checked against full conversion.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16086 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success/set.v')
-rw-r--r-- | test-suite/success/set.v | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/test-suite/success/set.v b/test-suite/success/set.v index 230192753..8116e8975 100644 --- a/test-suite/success/set.v +++ b/test-suite/success/set.v @@ -1,8 +1,19 @@ +(* This used to fail in 8.0pl1 *) + Goal forall n, n+n=0->0=n+n. intros. - -(* This used to fail in 8.0pl1 *) set n in * |-. +Abort. + +(* This works from 8.4pl1, since merging of different instances of the + same metavariable in a pattern is done modulo conversion *) + +Notation "p .+1" := (S p) (at level 1, left associativity, format "p .+1"). + +Goal forall (f:forall n, n=0 -> Prop) n (H:(n+n).+1=0), f (n.+1+n) H. +intros. +set (f _ _). +Abort. |