Codefmt.State
type t = {
context : (out * Types.Source.tag) Stack.t;
mutable current : out;
}
val create : unit -> t
val push : t -> Types.Source.token -> unit
val enter : t -> Types.Source.tag -> unit
val leave : t -> unit
val flush : t -> Types.Source.token list