type t
val of_bytes : bytes -> t
val read_bits : t -> int -> int
val peek_bits : t -> int -> int
val has_more : t -> bool
val available_bits : t -> int
val byte_pos : t -> int
val bit_pos : t -> int