Pre_sexp.String_single_sexp
val parse : ?parse_pos:Parse_pos.t -> ?len:int -> string -> (string, Type.t) parse_result