sig
type 'a t
val stream : 'a Eliom_bus.t -> 'a Lwt_stream.t
val original_stream : 'a Eliom_bus.t -> 'a Lwt_stream.t
val write : 'a Eliom_bus.t -> 'a -> unit Lwt.t
val close : 'a Eliom_bus.t -> unit
val set_queue_size : 'a Eliom_bus.t -> int -> unit
val set_time_before_flush : 'a Eliom_bus.t -> float -> unit
val force_link : unit
end