Bounded_queue.Commontype t = {closed : unit -> bool;Is the queue closed for writing. Consumers should only use try_pop because a queue that's closed-for-writing might still contain straggler items that need to be consumed.
This should be as fast and cheap as possible.
*)num_discarded : unit -> int;How many items were discarded?
*)size : unit -> int;Snapshot of how many items are currently in the queue
*)high_watermark : unit -> int;Maximum size of the queue
*)}val num_discarded : t -> intval closed : t -> boolval size : t -> intval high_watermark : t -> int