From 909d7c9edd05868d1fba2dae65e6ff775a41dcbe Mon Sep 17 00:00:00 2001
From: barras
Date: Thu, 14 Feb 2002 15:54:01 +0000
Subject: - Reforme de la gestion des args recursifs (via arbres reguliers) -
 coqtop -byte -opt bouclait!

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

(limited to 'library')

diff --git a/library/declare.ml b/library/declare.ml
index 1bd7ad97e1..6c715bfe28 100644
--- a/library/declare.ml
+++ b/library/declare.ml
@@ -226,7 +226,6 @@ let open_inductive (sp,mie) =
   List.iter (fun (sp, ref) -> Nametab.push 0 (restrict_path 0 sp) ref) names
 
 let dummy_one_inductive_entry mie = {
-  mind_entry_nparams = 0;
   mind_entry_params = [];
   mind_entry_typename = mie.mind_entry_typename;
   mind_entry_arity = mkProp;
-- 
cgit v1.2.3