sig
  module type Buffers =
    sig
      type 'a t
      val create : int -> 'a -> 'a Buffers.Buffers.t
      val add : 'a -> 'a Buffers.Buffers.t -> 'a Buffers.Buffers.t
      val iter : ('a -> unit) -> 'a Buffers.Buffers.t -> unit
      val clean : 'a Buffers.Buffers.t -> 'a Buffers.Buffers.t
    end
end