sig
  type 'a vector = 'a Vector.t
  type _ t
  val empty : unit -> 'a Vector.Builder.t
  val copy : 'a Vector.Builder.t -> 'a Vector.Builder.t
  val put : 'a Vector.Builder.t -> 'a -> unit
  val clear : 'a Vector.Builder.t -> unit
  val result : 'a Vector.Builder.t -> 'a Vector.Builder.vector
end