From 4a602e4d159c68eaa127e636df0d3445bfe998a2 Mon Sep 17 00:00:00 2001
From: letouzey
Date: Fri, 25 Jun 2004 00:00:12 +0000
Subject: correspondance des records et noms de champs de records entre un
 module et sa signature

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

(limited to 'library')

diff --git a/library/declare.ml b/library/declare.ml
index 398fed7042..6c8526b91c 100644
--- a/library/declare.ml
+++ b/library/declare.ml
@@ -271,6 +271,7 @@ let dummy_one_inductive_entry mie = {
 
 (* Hack to reduce the size of .vo: we keep only what load/open needs *)
 let dummy_inductive_entry m = {
+  mind_entry_record = false;
   mind_entry_finite = true;
   mind_entry_inds = List.map dummy_one_inductive_entry m.mind_entry_inds }
 
-- 
cgit v1.2.3