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