diff options
| author |  mohring <mohring@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-01-30 07:21:52 +0000 |
|---|---|---|
| committer | mohring <mohring@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-01-30 07:21:52 +0000 |
| commit | a02743ac6b64f87a497baba206082f6adbcb3219 (patch) | |
| tree | 131057a7c6d373b71db0072d4c703c611d49511a /kernel | |
| parent | 5489f356bdd7d1bc8511e3d2e4e5753373057b5f (diff) | |
Reparation erreur de syntaxe
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2443 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/indtypes.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/indtypes.ml b/kernel/indtypes.ml index 12f176040..4ab8d3cb5 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 *) |