diff options
Diffstat (limited to 'kernel/type_errors.mli')
| -rw-r--r-- | kernel/type_errors.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/kernel/type_errors.mli b/kernel/type_errors.mli index 284f244f1..20fa410e4 100644 --- a/kernel/type_errors.mli +++ b/kernel/type_errors.mli @@ -35,6 +35,7 @@ type type_error = | OccurCheck of int * constr | NotClean of int * constr | VarNotFound of identifier + | UnexpectedType of constr * constr | NotProduct of constr (* Pattern-matching errors *) | BadConstructor of constructor * inductive @@ -91,4 +92,6 @@ val error_not_inductive : path_kind -> env -> constr -> 'a val error_ml_case : path_kind -> env -> string -> constr -> constr -> constr -> constr -> 'a +val error_unexpected_type : env -> actual:constr -> expected:constr -> 'a + val error_not_product : env -> constr -> 'a |