Module BatConcreteQueue

type 'a cell =
  1. | Nil
  2. | Cons of {
    1. content : 'a;
    2. mutable next : 'a cell;
    }
type 'a t = {
  1. mutable length : int;
  2. mutable first : 'a cell;
  3. mutable last : 'a cell;
}
val of_abstr : 'a Stdlib.Queue.t -> 'a t
val to_abstr : 'a t -> 'a Stdlib.Queue.t
val filter_inplace : ('a -> bool) -> 'a t -> unit