simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-06 03:05:28 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

less aggressive constant.

Browse source 
series of sizes should now be:

```
 # let next n = n + n lsr 1 + 2;;
 # CCSeq.unfold (fun x -> Some (x, next x)) 0 |> CCSeq.take 20 |> CCSeq.to_list;;
- : int list =
[0; 2; 5; 9; 15; 24; 38; 59; 90; 137; 207; 312; 470; 707; 1062; 1595; 2394;
 3593; 5391; 8088]
 ```
This commit is contained in:
Simon Cruanes 2022-02-03 19:15:13 -05:00
parent 02c0953468
commit 21c10d2ad4
No known key found for this signature in database
GPG key ID: 4AC01D0849AA62B6
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/core/CCVector.ml
View file

@ -84,7 +84,7 @@ let[@inline] array_is_empty_ v =
(* next capacity, if current one is [n] *)
let[@inline] next_grow_ n =
min Sys.max_array_length (n + n lsr 1 + 5)
min Sys.max_array_length (n + n lsr 1 + 2)
(* resize the underlying array using x to temporarily fill the array *)
let resize_ v newcapacity x =