sig
  type t = [ `Ok | `Reader_closed ]
  val sexp_of_t : Pipe.Flushed_result.t -> Sexplib.Sexp.t
end