From b4636d4cd6fc5d20aca23841e4e0139243cc371b Mon Sep 17 00:00:00 2001
From: filliatr
Date: Tue, 21 Nov 2000 17:05:46 +0000
Subject: ajout d'un frozen_state après la fermeture d'une section (sinon bug
 !)

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

diff --git a/library/lib.ml b/library/lib.ml
index 5e687b9707..712292812d 100644
--- a/library/lib.ml
+++ b/library/lib.ml
@@ -154,7 +154,8 @@ let close_section export f s =
   add_entry (make_path (id_of_string s) OBJ)
     (ClosedSection (export, s,after',contents));
   Nametab.push_module s contents;
-  if export then Nametab.open_module_contents s
+  if export then Nametab.open_module_contents s;
+  add_frozen_state ()
 
 (* The following function exports the whole library segment, that will be 
    saved as a module. Objects are presented in chronological order, and
-- 
cgit v1.2.3