Module Persistent_connection_kernel.Event

type ('conn, 'conn_error, 'address) t =
  1. | Attempting_to_connect
  2. | Obtained_address of 'address
  3. | Failed_to_connect of 'conn_error
  4. | Connected of 'conn
  5. | Disconnected
val sexp_of_t : ('conn -> Sexplib0.Sexp.t) -> ('conn_error -> Sexplib0.Sexp.t) -> ('address -> Sexplib0.Sexp.t) -> ('conn, 'conn_error, 'address) t -> Sexplib0.Sexp.t
val attempting_to_connect : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t
val obtained_address : 'conn 'conn_error 'address. 'address -> ('conn, 'conn_error, 'address) t
val failed_to_connect : 'conn 'conn_error 'address. 'conn_error -> ('conn, 'conn_error, 'address) t
val connected : 'conn 'conn_error 'address. 'conn -> ('conn, 'conn_error, 'address) t
val disconnected : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t
val is_attempting_to_connect : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> bool
val is_obtained_address : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> bool
val is_failed_to_connect : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> bool
val is_connected : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> bool
val is_disconnected : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> bool
val attempting_to_connect_val : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> unit option
val obtained_address_val : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> 'address option
val failed_to_connect_val : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> 'conn_error option
val connected_val : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> 'conn option
val disconnected_val : 'conn 'conn_error 'address. ('conn, 'conn_error, 'address) t -> unit option
module Variants : sig ... end
val log_level : (_, _, _) t -> [ `Info | `Debug | `Error ]