let for_all t ~f = Doubly_linked.for_all t.queue ~f:(fun kv -> f kv.value)