| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 1 | " Tests for srand() and rand() |
| 2 | |
| Yasuhiro Matsumoto | f0a9c00 | 2022-12-05 21:55:55 +0000 | [diff] [blame] | 3 | source check.vim |
| 4 | source shared.vim |
| 5 | |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 6 | func Test_Rand() |
| 7 | let r = srand(123456789) |
| Bram Moolenaar | f8c1f92 | 2019-11-28 22:13:14 +0100 | [diff] [blame] | 8 | call assert_equal([1573771921, 319883699, 2742014374, 1324369493], r) |
| 9 | call assert_equal(4284103975, rand(r)) |
| 10 | call assert_equal(1001954530, rand(r)) |
| 11 | call assert_equal(2701803082, rand(r)) |
| 12 | call assert_equal(2658065534, rand(r)) |
| 13 | call assert_equal(3104308804, rand(r)) |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 14 | |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 15 | let s = srand() |
| Bram Moolenaar | 9dacdb1 | 2022-12-06 09:05:25 +0000 | [diff] [blame] | 16 | " using /dev/urandom or used time, result is different each time |
| 17 | call assert_notequal(s, srand()) |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 18 | |
| Bram Moolenaar | 4f645c5 | 2020-02-08 16:40:39 +0100 | [diff] [blame] | 19 | call test_srand_seed(123456789) |
| 20 | call assert_equal(4284103975, rand()) |
| 21 | call assert_equal(1001954530, rand()) |
| 22 | call test_srand_seed() |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 23 | |
| Bram Moolenaar | 73e28dc | 2022-09-17 21:08:33 +0100 | [diff] [blame] | 24 | call assert_fails('echo srand(1.2)', 'E805:') |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 25 | call assert_fails('echo srand([1])', 'E745:') |
| Bram Moolenaar | 68e9e5f | 2019-11-28 22:55:43 +0100 | [diff] [blame] | 26 | call assert_fails('echo rand("burp")', 'E475:') |
| Bram Moolenaar | 9b7bf9e | 2020-07-11 22:14:59 +0200 | [diff] [blame] | 27 | call assert_fails('echo rand([1, 2, 3])', 'E730:') |
| 28 | call assert_fails('echo rand([[1], 2, 3, 4])', 'E730:') |
| 29 | call assert_fails('echo rand([1, [2], 3, 4])', 'E730:') |
| 30 | call assert_fails('echo rand([1, 2, [3], 4])', 'E730:') |
| 31 | call assert_fails('echo rand([1, 2, 3, [4]])', 'E730:') |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 32 | endfunc |
| Bram Moolenaar | 4f645c5 | 2020-02-08 16:40:39 +0100 | [diff] [blame] | 33 | |
| 34 | func Test_issue_5587() |
| 35 | call rand() |
| 36 | call garbagecollect() |
| 37 | call rand() |
| 38 | endfunc |
| Bram Moolenaar | 6d91bcb | 2020-08-12 18:50:36 +0200 | [diff] [blame] | 39 | |
| Yasuhiro Matsumoto | f0a9c00 | 2022-12-05 21:55:55 +0000 | [diff] [blame] | 40 | func Test_srand() |
| 41 | CheckNotGui |
| 42 | |
| 43 | let cmd = GetVimCommand() .. ' -V -es -c "echo rand()" -c qa!' |
| 44 | let bad = 0 |
| 45 | for _ in range(10) |
| 46 | echo cmd |
| 47 | let result1 = system(cmd) |
| 48 | let result2 = system(cmd) |
| 49 | if result1 ==# result2 |
| 50 | let bad += 1 |
| 51 | endif |
| 52 | endfor |
| 53 | call assert_inrange(0, 4, bad) |
| 54 | endfunc |
| 55 | |
| Bram Moolenaar | 6d91bcb | 2020-08-12 18:50:36 +0200 | [diff] [blame] | 56 | " vim: shiftwidth=2 sts=2 expandtab |