Mercurial > vim
annotate src/testdir/test77a.in @ 32958:578ffda95ad5 v9.0.1779
patch 9.0.1779: Need more state() tests
Commit: https://github.com/vim/vim/commit/8dabccd295271104ad5af0abc48e283d644cff59
Author: zeertzjq <zeertzjq@outlook.com>
Date: Tue Aug 22 21:22:24 2023 +0200
patch 9.0.1779: Need more state() tests
Problem: Need more state() tests
Solution: Add a few more tests for operater pending mode and register
yank command
closes: #12883
Signed-off-by: Christian Brabandt <cb@256bit.org>
Co-authored-by: author
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Tue, 22 Aug 2023 21:30:03 +0200 |
parents | e705ea6e855b |
children |
rev | line source |
---|---|
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 | |
21797
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
13 :silent! while 0 |
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
14 : e! test.ok |
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
15 : w! test.out |
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
16 : qa! |
e705ea6e855b
patch 8.2.1448: test 77a for VMS depends on small.vim which does not exist
Bram Moolenaar <Bram@vim.org>
parents:
5704
diff
changeset
|
17 :silent! endwhile |
5704 | 18 :if !has("vms") |
19 : e! test.ok | |
20 : w! test.out | |
21 : qa! | |
22 :endif | |
23 :set fileformat=unix undolevels=-1 | |
24 ggdG | |
25 :let i = 1 | |
26 :while i <= 2000000 | call append(i, range(i, i + 99)) | let i += 100 | endwhile | |
27 ggdd | |
28 :w! Xtest. | |
29 :r !@test77a.com Xtest. | |
30 :s/\s/ /g | |
31 :set fileformat& | |
32 :.w! test.out | |
33 :qa! | |
34 ENDTEST | |
35 |