diff --git a/ocaml/testsuite/tests/lib-random/chi2.ml b/ocaml/testsuite/tests/lib-random/chi2.ml index 180beb59931..42d2b1d7cd6 100644 --- a/ocaml/testsuite/tests/lib-random/chi2.ml +++ b/ocaml/testsuite/tests/lib-random/chi2.ml @@ -96,7 +96,6 @@ let _ = (let p = Int64.to_int 17766642568158577L in fun () -> Random.full_int (256 * p) / p) end; -(* BACKPORT let r1 = Random.split() in let r2 = Random.split() in let r3 = Random.State.split r1 in @@ -106,4 +105,3 @@ let _ = (fun () -> Random.State.bits r1 - Random.State.bits r2); test "Random.split (r2-r3)" (fun () -> Random.State.bits r2 - Random.State.bits r3) -*)