Module Postgres

module Postgres: sig  end

module Result: sig  end

module Connection: sig  end

module LargeObjects: sig  end

type error =

`\|`	`Field_out_of_range of (int * int)`
`\|`	`Tuple_out_of_range of (int * int)`
`\|`	`Binary`
`\|`	`ConnectionFailure of string`
`\|`	`UnexpectedStatus of (Result.status * string * Result.status list)`

exception Error of error

val string_of_error : error -> string

class type result = object  end

class connection : string -> object  end

val conninfo : ?host:string ->
       ?hostaddr:string ->
       ?port:string ->
       ?dbname:string ->
       ?user:string ->
       ?password:string ->
       ?options:string -> ?tty:string -> ?requiressl:string -> unit -> string

val escape_string : string -> string

val escape_substring : string -> int -> int -> string

val escapeString : dest:string -> int -> src:string -> int -> int -> int