Memq_intf.memq_as_obj
method enqueue : 'msg -> (unit, 't) Tjr_monad.m
method dequeue : unit -> ('msg, 't) Tjr_monad.m
method len : unit -> int