Module Vernacstate

module Parser : sig ... end
module LemmaStack : sig ... end
type t = {
parsing : Parser.state;

parsing state parsing state may not behave 100% functionally yet, beware

system : States.state;

summary + libstack

lemmas : LemmaStack.t option;

proofs of lemmas currently opened

shallow : bool;

is the state trimmed down (libstack)

}
val freeze_interp_state : marshallable:bool -> t
val unfreeze_interp_state : t -> unit
val make_shallow : t -> t
val invalidate_cache : unit -> unit
module Declare : sig ... end