From 57740cb8ed713e5e79e441a31176955fd94220fa Mon Sep 17 00:00:00 2001 From: herbelin Date: Thu, 18 May 2000 08:19:49 +0000 Subject: Ajouts des causes d'erreur de Indrec git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@446 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/type_errors.mli | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'kernel/type_errors.mli') 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 : -- cgit v1.2.3