diff options
| author | Pierre-Marie Pédrot | 2018-04-14 13:46:05 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2018-04-14 13:46:05 +0200 |
| commit | 2384fcb98640dbd9aeee4e8e43965d499e594815 (patch) | |
| tree | c7aaa89a76405ab8695d26590d76a971a170c850 /pretyping/typeclasses.ml | |
| parent | 4f6681a4835758a27aaade3c18c21a5fe6d283c5 (diff) | |
| parent | e158df83522215b7699879c38906471598217866 (diff) | |
Merge PR #7136: Evar maps contain econstrs.
Diffstat (limited to 'pretyping/typeclasses.ml')
| -rw-r--r-- | pretyping/typeclasses.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/typeclasses.ml b/pretyping/typeclasses.ml index 08051fd3a1..30ddeffa69 100644 --- a/pretyping/typeclasses.ml +++ b/pretyping/typeclasses.ml @@ -158,7 +158,7 @@ let rec is_class_type evd c = | _ -> is_class_constr evd c let is_class_evar evd evi = - is_class_type evd (EConstr.of_constr evi.Evd.evar_concl) + is_class_type evd evi.Evd.evar_concl (* * classes persistent object |