diff options
Diffstat (limited to 'library/lib.mli')
-rw-r--r-- | library/lib.mli | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/library/lib.mli b/library/lib.mli index 1ea76f1ad..a37d7a113 100644 --- a/library/lib.mli +++ b/library/lib.mli @@ -155,14 +155,16 @@ val mark_end_of_command : unit -> unit (** Returns the current label number *) val current_command_label : unit -> int -(** The first label number *) -val first_command_label : int - (** [reset_label n] resets [lib_stk] to the label n registered by [mark_end_of_command()]. It forgets anything registered after this label. The label should be strictly in the past. *) val reset_label : int -> unit +(** [raw_reset_initial] is now [reset_label] to the first label. + This is meant to be used during initial Load's and compilations. + Otherwise, consider instead [Backtrack.reset_initial] *) +val raw_reset_initial : unit -> unit + (** search the label registered immediately before adding some definition *) val label_before_name : Names.Id.t Loc.located -> int |