Functor Vector.Queue

module Queue (E : AnyType) : QueueOfArray(MakeArray(E))
Parameters:
E : AnyType

module V: Vector.OfArray(A)
type t = {
   mutable v : V.t;
   mutable front : int;
   mutable back : int;
}
type elt = V.elt 
val create : ?size:int -> unit -> t
val is_empty : t -> bool
val clear : t -> unit
val add : t -> V.elt -> unit
val peek : t -> V.elt
val compact : t -> unit
val pop : t -> V.elt
val size : t -> int