sig
  type 'a t = ('a, Execution_context.t) Raw_stream.t
  val sexp_of_t : ('-> Sexplib.Sexp.t) -> 'a t -> Sexplib.Sexp.t
  val create : ('Tail.t -> unit) -> 'a t
  type ('a, 'execution_context) next_ =
    ('a, 'execution_context) Async_stream.next_ =
      Nil
    | Cons of 'a * ('a, 'execution_context) Raw_stream.t
  type 'a next = ('a, Execution_context.t) next_
  val next : 'a t -> 'a next Deferred.t
  val first_exn : 'a t -> 'Deferred.t
  val of_list : 'a list -> 'a t
  val to_list : 'a t -> 'a list Deferred.t
  val of_fun : (unit -> 'Deferred.t) -> 'a t
  val copy_to_tail : 'a t -> 'Tail.t -> unit Deferred.t
  val append : 'a t -> 'a t -> 'a t
  val concat : 'a t t -> 'a t
  val available_now : 'a t -> 'a list * 'a t
  val filter' : 'a t -> f:('-> bool Deferred.t) -> 'a t
  val filter : 'a t -> f:('-> bool) -> 'a t
  val filter_map' : 'a t -> f:('-> 'b option Deferred.t) -> 'b t
  val filter_map : 'a t -> f:('-> 'b option) -> 'b t
  val fold' :
    'a t -> init:'-> f:('-> '-> 'Deferred.t) -> 'Deferred.t
  val fold : 'a t -> init:'-> f:('-> '-> 'b) -> 'Deferred.t
  val iter' : 'a t -> f:('-> unit Deferred.t) -> unit Deferred.t
  val closed : 'a t -> unit Deferred.t
  val iter : 'a t -> f:('-> unit) -> unit
  val take_until : 'a t -> unit Deferred.t -> 'a t
  val iter_durably' : 'a t -> f:('-> unit Deferred.t) -> unit Deferred.t
  val iter_durably : 'a t -> f:('-> unit) -> unit
  val iter_durably_report_end : 'a t -> f:('-> unit) -> unit Deferred.t
  val length : 'a t -> int Deferred.t
  val map' : 'a t -> f:('-> 'Deferred.t) -> 'b t
  val map : 'a t -> f:('-> 'b) -> 'b t
  val first_n : 'a t -> int -> 'a t
  val unfold : '-> f:('-> ('a * 'b) option Deferred.t) -> 'a t
  val split :
    ?stop:unit Deferred.t ->
    ?f:('-> [ `Continue | `Found of 'b ]) ->
    'a t ->
    'a t *
    [ `End_of_stream | `Found of 'b * 'a t | `Stopped of 'a t ] Deferred.t
  val find :
    'a t ->
    f:('-> bool) -> [ `End_of_stream | `Found of 'a * 'a t ] Deferred.t
  val ungroup : 'a list t -> 'a t
  val interleave : 'a t t -> 'a t
  val ounit_tests : unit -> OUnit.test
end