aboutsummaryrefslogtreecommitdiff
path: root/kernel
diff options
context:
space:
mode:
Diffstat (limited to 'kernel')
-rw-r--r--kernel/type_errors.ml1
-rw-r--r--kernel/type_errors.mli1
2 files changed, 2 insertions, 0 deletions
diff --git a/kernel/type_errors.ml b/kernel/type_errors.ml
index 34dee81c8c..f96b0b9a16 100644
--- a/kernel/type_errors.ml
+++ b/kernel/type_errors.ml
@@ -54,6 +54,7 @@ type type_error =
| UnexpectedType of constr * constr
| NotProduct of constr
(* Pattern-matching errors *)
+ | BadPattern of constructor * constr
| BadConstructor of constructor * inductive
| WrongNumargConstructor of constructor_path * int
| WrongPredicateArity of constr * int * int
diff --git a/kernel/type_errors.mli b/kernel/type_errors.mli
index f5e16f3c47..d8031350c9 100644
--- a/kernel/type_errors.mli
+++ b/kernel/type_errors.mli
@@ -58,6 +58,7 @@ type type_error =
| UnexpectedType of constr * constr
| NotProduct of constr
(* Pattern-matching errors *)
+ | BadPattern of constructor * constr
| BadConstructor of constructor * inductive
| WrongNumargConstructor of constructor_path * int
| WrongPredicateArity of constr * int * int