Module Current_term.Output
type active = [ | `Ready| `Running| `Waiting_for_confirmation
]val equal_active : active -> active -> Ppx_deriving_runtime.booltype 'a t = ('a, [ `Active of active | `Msg of string ]) Stdlib.resultval equal :
('a -> 'a -> Ppx_deriving_runtime.bool) ->
'a t ->
'a t ->
Ppx_deriving_runtime.boolval pp :
'a Fmt.t ->
('a, [< `Active of active | `Msg of string ]) Stdlib.result Fmt.t