diff options
| author | filliatr | 1999-12-12 22:03:12 +0000 |
|---|---|---|
| committer | filliatr | 1999-12-12 22:03:12 +0000 |
| commit | ed8ec17ce48b4d0cf14696a4e9760239aa31f59b (patch) | |
| tree | 6c596c6e8ccebb4d29a856439f07d3fd85a4e3d2 /library/lib.mli | |
| parent | 9658d225b4003ac10c4c670e788d386930c3fa60 (diff) | |
modules
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@238 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'library/lib.mli')
| -rw-r--r-- | library/lib.mli | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/library/lib.mli b/library/lib.mli index 2fe172f9f6..36b49bbeb2 100644 --- a/library/lib.mli +++ b/library/lib.mli @@ -13,12 +13,13 @@ open Summary type node = | Leaf of obj + | Module of string | OpenedSection of string * Summary.frozen | FrozenState of Summary.frozen -and library_segment = (section_path * node) list +and library_entry = section_path * node -type library_entry = section_path * node +and library_segment = library_entry list (*s Adding operations (which calls the [cache] method, and getting the @@ -39,7 +40,7 @@ val make_path : identifier -> path_kind -> section_path val cwd : unit -> string list val is_section_p : section_path -> bool -val open_module : string -> unit +val start_module : string -> unit val export_module : unit -> library_segment |