From d44846131cf2fab2d3c45d435b84d802b1af8d43 Mon Sep 17 00:00:00 2001 From: herbelin Date: Wed, 15 Dec 1999 15:24:13 +0000 Subject: Nouveaux types 'constructor' et 'inductive' dans Term; les fonctions sur les inductifs prennent maintenant des 'inductive' en paramètres; elle n'ont plus besoin de faire des appels dangereux aux find_m*type qui centralisent la levée de raise Induc. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@257 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/type_errors.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'kernel/type_errors.ml') diff --git a/kernel/type_errors.ml b/kernel/type_errors.ml index 02db98b98..3cca1c694 100644 --- a/kernel/type_errors.ml +++ b/kernel/type_errors.ml @@ -33,7 +33,7 @@ type type_error = | NotClean of int * constr | VarNotFound of identifier (* Pattern-matching errors *) - | BadConstructor of constructor_path * inductive_path + | BadConstructor of constructor * inductive | WrongNumargConstructor of constructor_path * int | WrongPredicateArity of constr * int * int | NeedsInversion of constr * constr -- cgit v1.2.3