mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-06 11:15:31 -05:00
fix(BV): clear bits properly
This commit is contained in:
parent
e01b758de8
commit
36eb87db21
1 changed files with 1 additions and 1 deletions
|
|
@ -161,7 +161,7 @@ let shrink_ bv size =
|
|||
if size < bv.size then (
|
||||
let desired = bytes_length_of_size size in
|
||||
let current = Bytes.length bv.b in
|
||||
if desired = current then clear_bits_above_ bv size;
|
||||
clear_bits_above_ bv size;
|
||||
really_resize_ bv ~desired ~current size
|
||||
)
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue