Persistent.Eventtype !'address t = 'address Persistent_connection_kernel.Make(Conn).Event.t = | Attempting_to_connect| Obtained_address of 'address| Failed_to_connect of Core.Error.t| Connected of conn| Disconnectedval sexp_of_t : ('address -> Sexplib0.Sexp.t) -> 'address t -> Sexplib0.Sexp.tval log_level : 'a t -> [ `Debug | `Error | `Info ]