Module `Vernacstate.LemmaStack`

type t

val pop : t -> Lemmas.t * t option
val push : t option -> Lemmas.t -> t
val map_top_pstate : f:(Declare.Proof.t -> Declare.Proof.t) -> t -> t
val with_top_pstate : t -> f:(Declare.Proof.t -> 'a) -> 'a