aboutsummaryrefslogtreecommitdiff
path: root/kernel/type_errors.mli
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/type_errors.mli')
-rw-r--r--kernel/type_errors.mli7
1 files changed, 7 insertions, 0 deletions
diff --git a/kernel/type_errors.mli b/kernel/type_errors.mli
index 961a1b2511..fae63666c1 100644
--- a/kernel/type_errors.mli
+++ b/kernel/type_errors.mli
@@ -28,6 +28,8 @@ type type_error =
| IllFormedRecBody of std_ppcmds * name list * int * constr array
| IllTypedRecBody of int * name list * unsafe_judgment array
* typed_type array
+ | NotInductive of constr
+ | MLCase of string * constr * constr * constr * constr
exception TypeError of path_kind * context * type_error
@@ -72,3 +74,8 @@ val error_ill_typed_rec_body :
path_kind -> unsafe_env -> int -> name list -> unsafe_judgment array
-> typed_type array -> 'b
+val error_not_inductive : path_kind -> unsafe_env -> constr -> 'a
+
+val error_ml_case : path_kind -> unsafe_env ->
+ string -> constr -> constr -> constr -> constr -> 'a
+