sig
type state = [ `Authorization | `Transaction | `Update ]
exception Protocol_error
exception Err_status of string
exception Bad_state
val tcp_port : int
class client :
Netchannels.in_obj_channel ->
Netchannels.out_obj_channel ->
object
method apop : user:string -> pass:string -> unit
method close : unit -> unit
method dele : msgno:int -> unit
method list : ?msgno:int -> unit -> (int, int * string) Hashtbl.t
method noop : unit -> unit
method pass : pass:string -> unit
method quit : unit -> unit
method retr : msgno:int -> Netchannels.in_obj_channel
method rset : unit -> unit
method stat : unit -> int * int * string
method state : Netpop.state
method stls :
peer_name:string option -> Netsys_crypto_types.tls_config -> unit
method tls_endpoint : Netsys_crypto_types.tls_endpoint option
method tls_session_props : Nettls_support.tls_session_props option
method top :
?lines:int -> msgno:int -> unit -> Netchannels.in_obj_channel
method uidl : ?msgno:int -> unit -> (int, string) Hashtbl.t
method user : user:string -> unit
end
class connect :
?proxy:#Uq_engines.client_endpoint_connector ->
Uq_engines.connect_address -> float -> client
end
