src/bitvector.mli

   1 type t
   2
   3 val create : ?init:bool -> int -> t
   4 val length : t -> int
   5 val set : t -> int -> bool -> unit
   6 val get : t -> int -> bool
   7
   8 val unsafe_set : t -> int -> bool -> unit
   9 val unsafe_get : t -> int -> bool