| 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 | |
| 15 | call test_settime(12341234) |
| 16 | let s = srand() |
| Bram Moolenaar | 4f645c5 | 2020-02-08 16:40:39 +0100 | [diff] [blame] | 17 | if !has('win32') && filereadable('/dev/urandom') |
| Bram Moolenaar | 07e4a19 | 2019-11-26 12:23:30 +0100 | [diff] [blame] | 18 | " using /dev/urandom |
| 19 | call assert_notequal(s, srand()) |
| 20 | else |
| 21 | " using time() |
| 22 | call assert_equal(s, srand()) |
| 23 | call test_settime(12341235) |
| 24 | call assert_notequal(s, srand()) |
| 25 | endif |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 26 | |
| Bram Moolenaar | 4f645c5 | 2020-02-08 16:40:39 +0100 | [diff] [blame] | 27 | call test_srand_seed(123456789) |
| 28 | call assert_equal(4284103975, rand()) |
| 29 | call assert_equal(1001954530, rand()) |
| 30 | call test_srand_seed() |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 31 | |
| Bram Moolenaar | 73e28dc | 2022-09-17 21:08:33 +0100 | [diff] [blame] | 32 | call assert_fails('echo srand(1.2)', 'E805:') |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 33 | call assert_fails('echo srand([1])', 'E745:') |
| Bram Moolenaar | 68e9e5f | 2019-11-28 22:55:43 +0100 | [diff] [blame] | 34 | call assert_fails('echo rand("burp")', 'E475:') |
| Bram Moolenaar | 9b7bf9e | 2020-07-11 22:14:59 +0200 | [diff] [blame] | 35 | call assert_fails('echo rand([1, 2, 3])', 'E730:') |
| 36 | call assert_fails('echo rand([[1], 2, 3, 4])', 'E730:') |
| 37 | call assert_fails('echo rand([1, [2], 3, 4])', 'E730:') |
| 38 | call assert_fails('echo rand([1, 2, [3], 4])', 'E730:') |
| 39 | call assert_fails('echo rand([1, 2, 3, [4]])', 'E730:') |
| Bram Moolenaar | 07e4a19 | 2019-11-26 12:23:30 +0100 | [diff] [blame] | 40 | |
| 41 | call test_settime(0) |
| Bram Moolenaar | 06b0b4b | 2019-11-25 15:40:55 +0100 | [diff] [blame] | 42 | endfunc |
| Bram Moolenaar | 4f645c5 | 2020-02-08 16:40:39 +0100 | [diff] [blame] | 43 | |
| 44 | func Test_issue_5587() |
| 45 | call rand() |
| 46 | call garbagecollect() |
| 47 | call rand() |
| 48 | endfunc |
| Bram Moolenaar | 6d91bcb | 2020-08-12 18:50:36 +0200 | [diff] [blame] | 49 | |
| Yasuhiro Matsumoto | f0a9c00 | 2022-12-05 21:55:55 +0000 | [diff] [blame] | 50 | func Test_srand() |
| 51 | CheckNotGui |
| 52 | |
| 53 | let cmd = GetVimCommand() .. ' -V -es -c "echo rand()" -c qa!' |
| 54 | let bad = 0 |
| 55 | for _ in range(10) |
| 56 | echo cmd |
| 57 | let result1 = system(cmd) |
| 58 | let result2 = system(cmd) |
| 59 | if result1 ==# result2 |
| 60 | let bad += 1 |
| 61 | endif |
| 62 | endfor |
| 63 | call assert_inrange(0, 4, bad) |
| 64 | endfunc |
| 65 | |
| Bram Moolenaar | 6d91bcb | 2020-08-12 18:50:36 +0200 | [diff] [blame] | 66 | " vim: shiftwidth=2 sts=2 expandtab |