(** [mq dequeue]. *) val run : Command.context -> Merge_queue.Branch.t -> Merge_queue.Drop.ending (** [run ctx name] is [mq dequeue NAME]. It takes no run lock. *)