diff options
author | Damien Doligez <damien.doligez@inria.fr> | 2016-04-15 13:39:35 +0200 |
---|---|---|
committer | Damien Doligez <damien.doligez@inria.fr> | 2016-04-15 13:39:35 +0200 |
commit | 11a359cb0577c8134cbe94c854ed8dd3bc62231a (patch) | |
tree | 290b05cddca9504fcce4145b26913da90f8a858a /testsuite/tests/lib-random | |
parent | 1915e20c5b43cc7788c22027c6c76e265083cb97 (diff) | |
download | ocaml-11a359cb0577c8134cbe94c854ed8dd3bc62231a.tar.gz |
fix random initialization test
Diffstat (limited to 'testsuite/tests/lib-random')
-rw-r--r-- | testsuite/tests/lib-random/rand.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/lib-random/rand.ml b/testsuite/tests/lib-random/rand.ml index e8c5cb8bc7..dbc6e8e323 100644 --- a/testsuite/tests/lib-random/rand.ml +++ b/testsuite/tests/lib-random/rand.ml @@ -2,5 +2,5 @@ let () = Random.self_init (); let x = Random.int 10000 in Random.self_init (); - let y = Random.int 1000 in + let y = Random.int 10000 in if x = y then print_endline "FAILED" else print_endline "PASSED" |