Mercurial > vim
annotate src/testdir/test77a.in @ 31137:548241980a27 v9.0.0903
patch 9.0.0903: key code checker doesn't check modifyOtherKeys resource
Commit: https://github.com/vim/vim/commit/236dffab43f919bdbc565e6edc38eb27e7a5b657
Author: Bram Moolenaar <Bram@vim.org>
Date: Fri Nov 18 21:20:25 2022 +0000
patch 9.0.0903: key code checker doesn't check modifyOtherKeys resource
Problem: Key code checker doesn't check modifyOtherKeys resource.
Solution: Request the modifyOtherKeys resource value. Drop resource DCS
responses.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Fri, 18 Nov 2022 22:30:04 +0100 |
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 |