diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-02-28 07:33:41 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-02-28 07:33:41 +0000 |
| commit | 9a431a1b43dead6d692c942986a25f0f8986465a (patch) | |
| tree | 5d11bfeee35709817dc664168fa3be1dc42f5cb1 /pretyping/evarsolve.mli | |
| parent | c43f9128237ac16fa0d7741744e3944ca72e7475 (diff) | |
Repairing r16205: errors raised by check_evar_instance were no longer
trapped by solve_simple_eqn.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16257 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/evarsolve.mli')
| -rw-r--r-- | pretyping/evarsolve.mli | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/pretyping/evarsolve.mli b/pretyping/evarsolve.mli index e34332c9b..3e769e02d 100644 --- a/pretyping/evarsolve.mli +++ b/pretyping/evarsolve.mli @@ -54,5 +54,8 @@ val is_unification_pattern : env * int -> evar_map -> constr -> constr list -> val solve_pattern_eqn : env -> constr list -> constr -> constr -val check_evar_instance : evar_map -> existential_key -> constr -> conv_fun -> - evar_map +exception IllTypedInstance of env * types * types + +(* May raise IllTypedInstance if types are not convertible *) +val check_evar_instance : + evar_map -> existential_key -> constr -> conv_fun -> evar_map |