type t
= writer Check_buffer_age'.t Core.Bag.Elt.t option
val dummy : t
val create : writer ‑> maximum_age:[ `At_most of Core.Time.Span.t | `Unlimited ] ‑> t
val destroy : t ‑> unit
val too_old : t ‑> unit Import.Deferred.t
val internal_check_now_for_unit_test : now:Core.Time_ns.t ‑> unit