Sigs.STREAM
type backend
type 'a t
val create : unit -> 'a t * ('a option -> unit)
val get : 'a t -> ('a option, backend) io