sig
  type t =
    Pre_sexp.Cont_state.t =
      Parsing_whitespace
    | Parsing_atom
    | Parsing_list
    | Parsing_sexp_comment
    | Parsing_block_comment
  val to_string : Sexp_intf.S.Cont_state.t -> string
end