diff options
author | 2008-12-16 10:19:06 +0000 | |
---|---|---|
committer | 2008-12-16 10:19:06 +0000 | |
commit | 6fabdb398ffedd3f3ffdef3cd02b8749be20445b (patch) | |
tree | fbf1765941a0f4f620b81c9ffc59006acd02e91a /theories/Classes/Init.v | |
parent | 302571c0740f4a93ef1350901e2ab1add792597b (diff) |
Finish fix for the treatment of [inverse] in [setoid_rewrite], making a
variant of the [unify] tactic that takes a hint db as argument and does
unification modulo its [transparent_state]. Add test-file for bug #1939
and another [AdvancedTypeClasses.v] that mimicks
[AdvancedCanonicalStructure.v].
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11685 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Classes/Init.v')
-rw-r--r-- | theories/Classes/Init.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Classes/Init.v b/theories/Classes/Init.v index 8b4cac5f4..7fb48aa43 100644 --- a/theories/Classes/Init.v +++ b/theories/Classes/Init.v @@ -33,7 +33,7 @@ Class Unconvertible (A : Type) (a b : A). Ltac unconvertible := match goal with - | |- @Unconvertible _ ?x ?y => conv x y ; fail 1 "Convertible" + | |- @Unconvertible _ ?x ?y => unify x y with typeclass_instances ; fail 1 "Convertible" | |- _ => eapply Build_Unconvertible end. |