sig
  type error = Invalid_condition_string of string
  exception Exception of Mode.error
  class type t =
    object
      method deliver : Output.impl -> string -> unit
      method flush : Output.impl -> unit
    end
  val direct : unit -> Mode.t
  val memory : unit -> Mode.t
  val retained : string -> Mode.t
end