package async_durable

  1. Overview
  2. Docs
type ('state, 'update, 'error, 'metadata) t =
  1. | Attempting_new_connection
  2. | Connection_success of 'metadata
  3. | Lost_connection
  4. | Failed_to_connect of Core.Error.t
  5. | Rpc_error of 'error
  6. | Update of 'update
  7. | State of 'state
val sexp_of_t : ('state -> Sexplib0.Sexp.t) -> ('update -> Sexplib0.Sexp.t) -> ('error -> Sexplib0.Sexp.t) -> ('metadata -> Sexplib0.Sexp.t) -> ('state, 'update, 'error, 'metadata) t -> Sexplib0.Sexp.t