type t
=
| Attempting_to_connect |
| Obtained_address of address |
| Failed_to_connect of Core_kernel.Error.t |
| Connected of conn Core_kernel.sexp_opaque |
| Disconnected |
include sig ... end
val sexp_of_t : t ‑> Sexplib.Sexp.t
val log_level : t ‑> [ `Info | `Debug | `Error ]