From a4436a6a355ecb3fffb52d1ca3f2d983a5bcfefd Mon Sep 17 00:00:00 2001
From: filliatr
Date: Thu, 9 Dec 1999 15:10:08 +0000
Subject:  - constantes avec recettes  - discharge en deux temps, avec état
 remis comme au début de la section (mais c'est toujours buggé)

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

(limited to 'library/library.ml')

diff --git a/library/library.ml b/library/library.ml
index 6edc044a4b..cbd4789532 100644
--- a/library/library.ml
+++ b/library/library.ml
@@ -62,7 +62,6 @@ let (raw_extern_module, raw_intern_module) =
 let segment_iter f =
   let rec apply = function
     | sp,Leaf obj -> f (sp,obj)
-    | _,ClosedSection (_,mseg) -> iter mseg
     | _,OpenedSection _ -> assert false
     | _,FrozenState _ -> ()
   and iter seg =
-- 
cgit v1.2.3