aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel/type_errors.mli
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/type_errors.mli')
-rw-r--r--kernel/type_errors.mli4
1 files changed, 2 insertions, 2 deletions
diff --git a/kernel/type_errors.mli b/kernel/type_errors.mli
index 66242b7cf..7ffbd312e 100644
--- a/kernel/type_errors.mli
+++ b/kernel/type_errors.mli
@@ -17,7 +17,7 @@ type type_error =
| NotAType of constr
| BadAssumption of constr
| ReferenceVariables of identifier
- | ElimArity of constr * constr list * constr * constr * constr
+ | ElimArity of inductive * constr list * constr * constr * constr
* (constr * constr * string) option
| CaseNotInductive of constr * constr
| NumberBranches of constr * constr * int
@@ -53,7 +53,7 @@ val error_assumption : path_kind -> env -> constr -> 'b
val error_reference_variables : path_kind -> env -> identifier -> 'b
val error_elim_arity :
- path_kind -> env -> constr -> constr list -> constr
+ path_kind -> env -> inductive -> constr list -> constr
-> constr -> constr -> (constr * constr * string) option -> 'b
val error_case_not_inductive :