summaryrefslogtreecommitdiff
path: root/testsuite/tests/lib-random
diff options
context:
space:
mode:
authorDamien Doligez <damien.doligez@inria.fr>2016-04-15 13:39:35 +0200
committerDamien Doligez <damien.doligez@inria.fr>2016-04-15 13:39:35 +0200
commit11a359cb0577c8134cbe94c854ed8dd3bc62231a (patch)
tree290b05cddca9504fcce4145b26913da90f8a858a /testsuite/tests/lib-random
parent1915e20c5b43cc7788c22027c6c76e265083cb97 (diff)
downloadocaml-11a359cb0577c8134cbe94c854ed8dd3bc62231a.tar.gz
fix random initialization test
Diffstat (limited to 'testsuite/tests/lib-random')
-rw-r--r--testsuite/tests/lib-random/rand.ml2
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"