Sourcetype nonrec ('a, 'b) t = ('a, 'a, 'b, 'b list) t Sourceval create : ?n:int -> unit -> ('a, 'b) t Sourceval add : ('a, 'b) t -> 'a -> 'b -> unit Sourceval stream : ('a, 'b) t -> ('a * 'b list) Stream.t Sourceval of_stream : ('a * 'b) Stream.t -> ('a, 'b) t Sourceval to_alist : ('a, 'b) t -> ('a * 'b list) list