Module Caqti_blocking.Stream
type ('a, 'err) t = unit -> ('a, 'err) node futureand ('a, 'err) node = | Nil| Error of 'err| Cons of 'a * ('a, 'err) t
val fold :
f:('a -> 'state -> 'state) ->
('a, 'err) t ->
'state ->
('state, 'err) result futureval fold_s :
f:('a -> 'state -> ('state, 'err) result future) ->
('a, 'clog) t ->
'state ->
('state, [> `Congested of 'clog ] as 'err) result futureval of_list : 'a list -> ('a, 'err) t