From d5d41c634dc1e3e7f07b3a465bc80b4eb5ea856f Mon Sep 17 00:00:00 2001
From: herbelin
Date: Sat, 5 Jan 2008 17:04:16 +0000
Subject: Fixed bug 1761 (unexpected anomaly when constructor type has invalid
 conclusion) and improved error message when the conclusion of the type of a
 constructor is invalid.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10425 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 kernel/indtypes.mli | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'kernel/indtypes.mli')

diff --git a/kernel/indtypes.mli b/kernel/indtypes.mli
index 620cbf5805..5a583bcb13 100644
--- a/kernel/indtypes.mli
+++ b/kernel/indtypes.mli
@@ -26,7 +26,7 @@ open Typeops
 type inductive_error =
   | NonPos of env * constr * constr
   | NotEnoughArgs of env * constr * constr
-  | NotConstructor of env * constr * constr
+  | NotConstructor of env * identifier * constr * constr * int * int
   | NonPar of env * constr * int * constr * constr
   | SameNamesTypes of identifier
   | SameNamesConstructors of identifier
-- 
cgit v1.2.3