From d98dfbcae463f8d699765e2d7004becd7714d6cf Mon Sep 17 00:00:00 2001
From: msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7>
Date: Wed, 13 Apr 2011 14:26:59 +0000
Subject: Add [Polymorphic] flag for defs

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13988 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 kernel/entries.ml | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'kernel/entries.ml')

diff --git a/kernel/entries.ml b/kernel/entries.ml
index 28f11c9af..32dfaae8f 100644
--- a/kernel/entries.ml
+++ b/kernel/entries.ml
@@ -55,9 +55,10 @@ type mutual_inductive_entry = {
 (*s Constants (Definition/Axiom) *)
 
 type definition_entry = {
-  const_entry_body   : constr;
-  const_entry_type   : types option;
-  const_entry_opaque : bool }
+  const_entry_body        : constr;
+  const_entry_type        : types option;
+  const_entry_polymorphic : bool;
+  const_entry_opaque      : bool }
 
 type inline = int option (* inlining level, None for no inlining *)
 
-- 
cgit v1.2.3