diff options
Diffstat (limited to 'library/lib.mli')
| -rw-r--r-- | library/lib.mli | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/library/lib.mli b/library/lib.mli index c6a0ba6803..96b1941ce2 100644 --- a/library/lib.mli +++ b/library/lib.mli @@ -15,7 +15,7 @@ type node = | Leaf of obj | Module of string | OpenedSection of string - | ClosedSection of string * library_segment + | ClosedSection of bool * string * library_segment * Nametab.module_contents | FrozenState of Summary.frozen and library_entry = section_path * node @@ -40,7 +40,9 @@ val contents_after : section_path option -> library_segment (*s Opening and closing a section. *) val open_section : string -> section_path -val close_section : string -> section_path * library_segment +val close_section : export:bool -> + (section_path -> library_segment -> Nametab.module_contents) -> string + -> unit val make_path : identifier -> path_kind -> section_path val cwd : unit -> dir_path |