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