sig
  module Arr :
    sig
      type 'a t
      val create : ?buck_size:int -> int -> 'CCAllocCache.Arr.t
      val make : 'CCAllocCache.Arr.t -> int -> '-> 'a array
      val free : 'CCAllocCache.Arr.t -> 'a array -> unit
      val with_ :
        'CCAllocCache.Arr.t -> int -> '-> f:('a array -> 'b) -> 'b
    end
end