sig
  type t = bytes
  val create : int -> Core_bytes.t
  val length : Core_bytes.t -> int
end