Mercurial > vim
annotate src/testdir/test77a.in @ 28618:daad4c7b39be v8.2.4833
patch 8.2.4833: failure of mapping not checked for
Commit: https://github.com/vim/vim/commit/12e21e387b5bbc928097abf1c189b7dc665838fc
Author: zeertzjq <zeertzjq@outlook.com>
Date: Wed Apr 27 11:58:01 2022 +0100
patch 8.2.4833: failure of mapping not checked for
Problem: Failure of mapping not checked for.
Solution: Check return value of ins_typebuf(). (closes https://github.com/vim/vim/issues/10299)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Wed, 27 Apr 2022 13:00: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 |