type t
[
|
`Server_session
`Client_session
`Inbound_envelope
`Outbound_envelope
`Cached_connection
]
include sig ... end
val sexp_of_t : t ‑> Base.Sexp.t