aboutsummaryrefslogtreecommitdiff
path: root/library/lib.mli
diff options
context:
space:
mode:
authorfilliatr2000-11-24 16:13:28 +0000
committerfilliatr2000-11-24 16:13:28 +0000
commit0c68df5ccdacb5d2ed50b533ad613723914dfee7 (patch)
treec83306fc05e7f70bdcd756086368e04b32e2699b /library/lib.mli
parent7f40f2807d4046a7cea8e83cb0a983cdc6401f78 (diff)
certains effets disparaissent a la sortie des sections, d'autres non (selon Summary.survive_section)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@945 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library/lib.mli')
-rw-r--r--library/lib.mli7
1 files changed, 4 insertions, 3 deletions
diff --git a/library/lib.mli b/library/lib.mli
index 96b1941ce2..397e5a53b4 100644
--- a/library/lib.mli
+++ b/library/lib.mli
@@ -14,7 +14,7 @@ open Summary
type node =
| Leaf of obj
| Module of string
- | OpenedSection of string
+ | OpenedSection of string * Summary.frozen
| ClosedSection of bool * string * library_segment * Nametab.module_contents
| FrozenState of Summary.frozen
@@ -41,8 +41,9 @@ val contents_after : section_path option -> library_segment
val open_section : string -> section_path
val close_section : export:bool ->
- (section_path -> library_segment -> Nametab.module_contents) -> string
- -> unit
+ (Summary.frozen -> section_path -> library_segment
+ -> Nametab.module_contents)
+ -> string -> unit
val make_path : identifier -> path_kind -> section_path
val cwd : unit -> dir_path