let iteri t ~f = read t (fun () -> Doubly_linked.iter t.queue ~f:(fun kv -> f ~key:kv.key ~data:kv.value))