From 5b108b017031b549a1e0c684d8ec385a3af44fa2 Mon Sep 17 00:00:00 2001
From: barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7>
Date: Mon, 22 Sep 2003 10:51:30 +0000
Subject: message d'erreur de garde des cofix

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4438 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 f37a6cb03..c0538c36a 100644
--- a/kernel/type_errors.ml
+++ b/kernel/type_errors.ml
@@ -32,7 +32,7 @@ type guard_error =
   | RecCallInCaseFun of constr
   | RecCallInCaseArg of constr
   | RecCallInCasePred of constr
-  | NotGuardedForm
+  | NotGuardedForm of constr
 
 type arity_error =
   | NonInformativeToInformative
-- 
cgit v1.2.3