From a02743ac6b64f87a497baba206082f6adbcb3219 Mon Sep 17 00:00:00 2001
From: mohring
Date: Wed, 30 Jan 2002 07:21:52 +0000
Subject: Reparation erreur de syntaxe

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

(limited to 'kernel')

diff --git a/kernel/indtypes.ml b/kernel/indtypes.ml
index 12f1760407..4ab8d3cb53 100644
--- a/kernel/indtypes.ml
+++ b/kernel/indtypes.ml
@@ -204,7 +204,7 @@ let type_inductive env mie =
   if mie.mind_entry_inds = [] then anomaly "empty inductive types declaration";
   (* Check unicity of names *)
   mind_check_names mie;
-  mind_check_arities env mie
+  mind_check_arities env mie;
   (* We first type params and arity of each inductive definition *)
   (* This allows to build the environment of arities and to share *)
   (* the set of constraints *)
-- 
cgit v1.2.3