sig
  type t = private { error_code : int; error_msg : string; }
  val error_msg : Response.Tws_error.t -> string
  val error_code : Response.Tws_error.t -> int
  module Fields :
    sig
      val names : string list
      val error_msg :
        (Response.Tws_error.t, string) Fieldslib.Field.readonly_t
      val error_code : (Response.Tws_error.t, int) Fieldslib.Field.readonly_t
      val fold :
        init:'acc__ ->
        error_code:('acc__ ->
                    (Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                    'acc__) ->
        error_msg:('acc__ ->
                   (Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
                   'acc__) ->
        'acc__
      val iter :
        error_code:((Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                    unit) ->
        error_msg:((Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
                   unit) ->
        unit
      val for_all :
        error_code:((Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                    bool) ->
        error_msg:((Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
                   bool) ->
        bool
      val exists :
        error_code:((Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                    bool) ->
        error_msg:((Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
                   bool) ->
        bool
      val to_list :
        error_code:((Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                    'elem__) ->
        error_msg:((Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
                   'elem__) ->
        'elem__ list
      val map_poly :
        ([< `Read ], Response.Tws_error.t, 'x0) Fieldslib.Field.user ->
        'x0 list
      module Direct :
        sig
          val iter :
            Response.Tws_error.t ->
            error_code:((Response.Tws_error.t, int)
                        Fieldslib.Field.readonly_t ->
                        Response.Tws_error.t -> int -> unit) ->
            error_msg:((Response.Tws_error.t, string)
                       Fieldslib.Field.readonly_t ->
                       Response.Tws_error.t -> string -> unit) ->
            unit
          val fold :
            Response.Tws_error.t ->
            init:'acc__ ->
            error_code:('acc__ ->
                        (Response.Tws_error.t, int)
                        Fieldslib.Field.readonly_t ->
                        Response.Tws_error.t -> int -> 'acc__) ->
            error_msg:('acc__ ->
                       (Response.Tws_error.t, string)
                       Fieldslib.Field.readonly_t ->
                       Response.Tws_error.t -> string -> 'acc__) ->
            'acc__
        end
    end
  val unpickler : t Tws_prot.Unpickler.t
  val pickler : t Tws_prot.Pickler.t Core.Std.Only_in_test.t
  val ( = ) : t -> t -> bool
  val create : error_code:int -> error_msg:string -> Response.Tws_error.t
  val to_string_hum : Response.Tws_error.t -> string
  val to_error : Response.Tws_error.t -> Core.Std.Error.t
  val to_exn : Response.Tws_error.t -> exn
  val raise : Response.Tws_error.t -> 'a
  val t_of_sexp : Sexplib.Sexp.t -> Response.Tws_error.t
  val sexp_of_t : Response.Tws_error.t -> Sexplib.Sexp.t
end