| Bram Moolenaar | 206f011 | 2014-03-12 16:51:55 +0100 | [diff] [blame] | 1 | Inserts 2 million lines with consecutive integers starting from 1 |
| 2 | (essentially, the output of GNU's seq 1 2000000), writes them to Xtest |
| 3 | and writes its cksum to test.out. |
| 4 | |
| 5 | We need 2 million lines to trigger a call to mf_hash_grow(). If it would mess |
| 6 | up the lines the checksum would differ. |
| 7 | |
| 8 | cksum is part of POSIX and so should be available on most Unixes. |
| 9 | If it isn't available then the test will be skipped. |
| 10 | |
| 11 | VMS does not have CKSUM but has a built in CHECKSUM - it should be used |
| 12 | STARTTEST |
| 13 | :so small.vim |
| 14 | :if !has("vms") |
| 15 | : e! test.ok |
| 16 | : w! test.out |
| 17 | : qa! |
| 18 | :endif |
| 19 | :set fileformat=unix undolevels=-1 |
| 20 | ggdG |
| 21 | :let i = 1 |
| 22 | :while i <= 2000000 | call append(i, range(i, i + 99)) | let i += 100 | endwhile |
| 23 | ggdd |
| 24 | :w! Xtest. |
| 25 | :r !@test77a.com Xtest. |
| 26 | :s/\s/ /g |
| 27 | :set fileformat& |
| 28 | :.w! test.out |
| 29 | :qa! |
| 30 | ENDTEST |
| 31 | |