- let bits = Bitmatch.Buffer.create () in
- List.iter (Bitmatch.Buffer.add_bit bits) expected;
- let bits = Bitmatch.Buffer.contents bits in
+ let bits = Bitstring.Buffer.create () in
+ List.iter (Bitstring.Buffer.add_bit bits) expected;
+ let bits = Bitstring.Buffer.contents bits in