blob: 02a4624c1d60e8a32754e861e36fcaeec1a8bc7c [file] [log] [blame]
Bram Moolenaar06b0b4b2019-11-25 15:40:55 +01001" Tests for srand() and rand()
2
3func Test_Rand()
4 let r = srand(123456789)
Bram Moolenaarf8c1f922019-11-28 22:13:14 +01005 call assert_equal([1573771921, 319883699, 2742014374, 1324369493], r)
6 call assert_equal(4284103975, rand(r))
7 call assert_equal(1001954530, rand(r))
8 call assert_equal(2701803082, rand(r))
9 call assert_equal(2658065534, rand(r))
10 call assert_equal(3104308804, rand(r))
Bram Moolenaar06b0b4b2019-11-25 15:40:55 +010011
Bram Moolenaar06b0b4b2019-11-25 15:40:55 +010012 let s = srand()
Bram Moolenaar9dacdb12022-12-06 09:05:25 +000013 " using /dev/urandom or used time, result is different each time
14 call assert_notequal(s, srand())
Bram Moolenaar06b0b4b2019-11-25 15:40:55 +010015
Bram Moolenaar4f645c52020-02-08 16:40:39 +010016 call test_srand_seed(123456789)
17 call assert_equal(4284103975, rand())
18 call assert_equal(1001954530, rand())
19 call test_srand_seed()
Bram Moolenaar06b0b4b2019-11-25 15:40:55 +010020
Bram Moolenaar73e28dc2022-09-17 21:08:33 +010021 call assert_fails('echo srand(1.2)', 'E805:')
Bram Moolenaar06b0b4b2019-11-25 15:40:55 +010022 call assert_fails('echo srand([1])', 'E745:')
Bram Moolenaar68e9e5f2019-11-28 22:55:43 +010023 call assert_fails('echo rand("burp")', 'E475:')
Bram Moolenaar9b7bf9e2020-07-11 22:14:59 +020024 call assert_fails('echo rand([1, 2, 3])', 'E730:')
25 call assert_fails('echo rand([[1], 2, 3, 4])', 'E730:')
26 call assert_fails('echo rand([1, [2], 3, 4])', 'E730:')
27 call assert_fails('echo rand([1, 2, [3], 4])', 'E730:')
28 call assert_fails('echo rand([1, 2, 3, [4]])', 'E730:')
Bram Moolenaar06b0b4b2019-11-25 15:40:55 +010029endfunc
Bram Moolenaar4f645c52020-02-08 16:40:39 +010030
31func Test_issue_5587()
32 call rand()
33 call garbagecollect()
34 call rand()
35endfunc
Bram Moolenaar6d91bcb2020-08-12 18:50:36 +020036
Yasuhiro Matsumotof0a9c002022-12-05 21:55:55 +000037func Test_srand()
38 CheckNotGui
39
40 let cmd = GetVimCommand() .. ' -V -es -c "echo rand()" -c qa!'
41 let bad = 0
42 for _ in range(10)
43 echo cmd
44 let result1 = system(cmd)
45 let result2 = system(cmd)
46 if result1 ==# result2
47 let bad += 1
48 endif
49 endfor
50 call assert_inrange(0, 4, bad)
51endfunc
52
Bram Moolenaar6d91bcb2020-08-12 18:50:36 +020053" vim: shiftwidth=2 sts=2 expandtab