Module Tail.Stream

module Stream: sig .. end

type 'a t

type ('a, 'execution_context) next_ = ('a, 'execution_context) Raw_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

include Raw

val sexp_of_t : ('a -> Sexplib.Sexp.t) -> 'a t -> Sexplib.Sexp.t