package current

  1. Overview
  2. Docs
type active = [
  1. | `Ready
  2. | `Running
]
val equal_active : active -> active -> Ppx_deriving_runtime.bool
type 'a t = ('a, [ `Active of active | `Msg of string ]) Stdlib.result
val equal : ('a -> 'a -> Ppx_deriving_runtime.bool) -> 'a t -> 'a t -> Ppx_deriving_runtime.bool
val pp : 'a Fmt.t -> ('a, [< `Active of active | `Msg of string ]) Stdlib.result Fmt.t