aboutsummaryrefslogtreecommitdiff
path: root/pretyping/typeclasses_errors.mli
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2019-03-12 12:58:47 +0100
committerEmilio Jesus Gallego Arias2019-03-12 12:58:47 +0100
commitf1d60cad76439d96da36ed7c52ff71b1b9573b80 (patch)
treebc4a2447fc0c784ee4e52bb22e6dfade55167358 /pretyping/typeclasses_errors.mli
parenta5fc75ae3eac4bb2162c624f9d25b53dba022f01 (diff)
parent46665f87bbdd2d5fe0c302eae63912d6418d7207 (diff)
Merge PR #9632: Fix #9631: Instance: anomaly grounding non evar-free term
Ack-by: SkySkimmer Reviewed-by: ejgallego Ack-by: ppedrot
Diffstat (limited to 'pretyping/typeclasses_errors.mli')
-rw-r--r--pretyping/typeclasses_errors.mli7
1 files changed, 4 insertions, 3 deletions
diff --git a/pretyping/typeclasses_errors.mli b/pretyping/typeclasses_errors.mli
index 9831627a9a..fd75781ed5 100644
--- a/pretyping/typeclasses_errors.mli
+++ b/pretyping/typeclasses_errors.mli
@@ -18,9 +18,10 @@ type typeclass_error =
| NotAClass of constr
| UnboundMethod of GlobRef.t * lident (** Class name, method *)
-exception TypeClassError of env * typeclass_error
+exception TypeClassError of env * Evd.evar_map * typeclass_error
-val not_a_class : env -> constr -> 'a
+val typeclass_error : env -> Evd.evar_map -> typeclass_error -> 'a
-val unbound_method : env -> GlobRef.t -> lident -> 'a
+val not_a_class : env -> Evd.evar_map -> constr -> 'a
+val unbound_method : env -> Evd.evar_map -> GlobRef.t -> lident -> 'a