Parser.Stack
type t = Csexp.Make(Core.Sexp).Parser.Stack.t =
| Empty
| Open of t
| Sexp of Core.Sexp.t * t
val to_list : t -> Core.Sexp.t list
val open_paren : t -> t
val close_paren : t -> t
val add_atom : string -> t -> t
val add_token : [ `other ] Lexer.token -> t -> t