let
dequeue t =
match
dequeue_with_key t
with
|
None
->
None
|
Some
(_, v)
->
Some
v