fixup! [Stdlib] Hashtbl: add a getter for randomize

bobot · Mar 26, 2014 · 46d1105 · 46d1105
1 parent ec11031
commit 46d1105
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/stdlib/hashtbl.ml b/stdlib/hashtbl.ml
@@ -47,7 +47,7 @@ let randomized_default =
 let randomized = ref randomized_default
 
 let randomize () = randomized := true
-let is_randomize () = !randomized
+let is_randomized () = !randomized
 
 let prng = lazy (Random.State.make_self_init())
 

diff --git a/stdlib/hashtbl.mli b/stdlib/hashtbl.mli
@@ -165,7 +165,7 @@ val randomize : unit -> unit
 
     @since 4.00.0 *)
 
-val is_randomize : unit -> bool
+val is_randomized : unit -> bool
 (** return if the tables are currently created in randomized mode by default
 
     @since 4.02.0 *)