simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2026-01-29 04:14:51 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

do not assume too much on initial size

Browse source
This commit is contained in:
Simon Cruanes 2013-03-07 19:10:57 +01:00
parent 7d96c9092a
commit d00144375b
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
fHashtbl.ml
View file

@ -156,7 +156,7 @@ module Tree(X : HASH) = struct
(** Empty hashtable *) (** Empty hashtable *)
let empty size = let empty size =
let size = max size 16 in (* size >= 16 *) let size = max size 4 in (* size >= 4 *)
Table (empty_buckets size) Table (empty_buckets size)
(** The address in a bucket array, after probing [i] times *) (** The address in a bucket array, after probing [i] times *)