open Irc
type t
val make :
router:Router.t ->
server_info:Server_info.t ->
addr:Unix.sockaddr ->
t
val close : ?reason:string -> t -> unit
val outbox : t -> Outbox.t
val on_msg : t -> Msg.t -> unit
val on_ping : t -> (unit, unit) result