diff options
Diffstat (limited to 'library')
| -rw-r--r-- | library/lib.ml | 1 | ||||
| -rw-r--r-- | library/lib.mli | 1 |
2 files changed, 1 insertions, 1 deletions
diff --git a/library/lib.ml b/library/lib.ml index 53b5a21b04..10fd9b9655 100644 --- a/library/lib.ml +++ b/library/lib.ml @@ -160,7 +160,6 @@ let close_section export s = pop_path_prefix (); add_entry (make_path (id_of_string s) OBJ) (ClosedSection (export, s,after')); - add_frozen_state (); (sp,after,fs) (* The following function exports the whole library segment, that will be diff --git a/library/lib.mli b/library/lib.mli index bc4032a61d..668a65adf9 100644 --- a/library/lib.mli +++ b/library/lib.mli @@ -28,6 +28,7 @@ and library_segment = library_entry list val add_leaf : identifier -> path_kind -> obj -> section_path val add_anonymous_leaf : obj -> unit +val add_frozen_state : unit -> unit (*s The function [contents_after] returns the current library segment, |