sig
  type ('value, 'partial_unpack) t =
      ?partial_unpack:'partial_unpack ->
      ?pos:int ->
      ?len:int ->
      Bigstring.t ->
      [ `Invalid_data of Error.t
      | `Not_enough_data of 'partial_unpack * int
      | `Ok of 'value * int ]
  val map :
    ('a, 'partial_unpack) Unpack_buffer.Unpack_one.t ->
    f:('a -> 'b) -> ('b, 'partial_unpack) Unpack_buffer.Unpack_one.t
  val create_bin_prot :
    'a Bin_prot.Type_class.reader -> ('a, unit) Unpack_buffer.Unpack_one.t
end