|
5704
|
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
|
