sig
  type t
  type status =
      Empty_query
    | Command_ok
    | Tuples_ok
    | Copy_out
    | Copy_in
    | Bad_response
    | Nonfatal_error
    | Fatal_error
  type oid = int
  external string_of_status : Postgres.Result.status -> string
    = "stub_PQresStatus"
  external is_null : Postgres.Result.t -> bool = "res_isnull"
  external status : Postgres.Result.t -> Postgres.Result.status
    = "stub_PQresultStatus"
  external error : Postgres.Result.t -> string = "stub_PQresultErrorMessage"
  external ntuples : Postgres.Result.t -> int = "stub_PQntuples"
  external nfields : Postgres.Result.t -> int = "stub_PQnfields"
  external binary_tuples : Postgres.Result.t -> bool = "stub_PQbinaryTuples"
  external fname : Postgres.Result.t -> int -> string = "stub_PQfname"
  external fnumber : Postgres.Result.t -> string -> int = "stub_PQfnumber"
  external ftype : Postgres.Result.t -> int -> Postgres.Result.oid
    = "stub_PQftype"
  external fsize : Postgres.Result.t -> int -> int = "stub_PQfsize"
  external fmod : Postgres.Result.t -> int -> int = "stub_PQfmod"
  external getvalue : Postgres.Result.t -> int -> int -> string
    = "stub_PQgetvalue"
  external getlength : Postgres.Result.t -> int -> int -> int
    = "stub_PQgetlength"
  external getisnull : Postgres.Result.t -> int -> int -> bool
    = "stub_PQgetisnull"
  external cmd_status : Postgres.Result.t -> string = "stub_PQcmdStatus"
  external cmd_tuples : Postgres.Result.t -> string = "stub_PQcmdTuples"
  external oid_value : Postgres.Result.t -> Postgres.Result.oid
    = "stub_PQoidValue"
end