sig
  type paren_type = Paren | Brace | Bracket
  and expr =
      List of Sread_expr.paren_type * Sread_expr.expr list
    | Atom of string
  val string_of_expr : Sread_expr.expr -> string
end