Mercurial > vim
annotate src/testdir/Make_vms.mms @ 18301:506bf60a30a0 v8.1.2145
patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Commit: https://github.com/vim/vim/commit/459fd785e4a8d044147a3f83a5fca8748528aa84
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun Oct 13 16:43:39 2019 +0200
patch 8.1.2145: cannot map <C-H> when modifyOtherKeys is enabled
Problem: Cannot map <C-H> when modifyOtherKeys is enabled.
Solution: Add the <C-H> mapping twice, both with modifier and as 0x08. Use
only the first one when modifyOtherKeys has been detected.
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Sun, 13 Oct 2019 16:45:04 +0200 |
| parents | 041156ce1d22 |
| children | f966b20bb74d |
| rev | line source |
|---|---|
| 7 | 1 # |
| 2 # Makefile to run all tests for Vim on VMS | |
| 3 # | |
| 4 # Authors: Zoltan Arpadffy, <arpadffy@polarhome.com> | |
| 5 # Sandor Kopanyi, <sandor.kopanyi@mailbox.hu> | |
| 6 # | |
|
17262
041156ce1d22
patch 8.1.1630: various small problems
Bram Moolenaar <Bram@vim.org>
parents:
16865
diff
changeset
|
7 # Last change: 2019 May 31 |
| 7 | 8 # |
| 1709 | 9 # This has been tested on VMS 6.2 to 8.3 on DEC Alpha, VAX and IA64. |
| 7 | 10 # Edit the lines in the Configuration section below to select. |
| 11 # | |
| 12 # Execute with: | |
| 13 # mms/descrip=Make_vms.mms | |
| 14 # Cleanup with: | |
| 15 # mms/descrip=Make_vms.mms clean | |
| 16 # | |
| 17 # Make files are MMK compatible. | |
| 18 # | |
| 19 # NOTE: You can run this script just in X/Window environment. It will | |
| 20 # create a new terminals, therefore you have to set up your DISPLAY | |
| 21 # logical. More info in VMS documentation or with: help set disp. | |
| 22 # | |
| 23 ####################################################################### | |
| 24 # Configuration section. | |
| 25 ####################################################################### | |
| 26 | |
| 27 # Uncomment if you want tests in GUI mode. Terminal mode is default. | |
| 28 # WANT_GUI = YES | |
| 29 | |
| 30 # Comment out if you want to run Unix specific tests as well, but please | |
| 31 # be aware, that on OpenVMS will fail, because of cat, rm, etc commands | |
| 32 # and directory handling. | |
| 33 # WANT_UNIX = YES | |
| 34 | |
| 1709 | 35 # Comment out if you want to run Win32 specific tests as well, but please |
| 36 # be aware, that on OpenVMS will fail, because of cat, rm, etc commands | |
| 37 # and directory handling. | |
| 38 # WANT_WIN = YES | |
| 39 | |
| 40 # Comment out if you want to run spell checker tests. | |
| 41 # They fail because VMS does not support file names. | |
| 42 # WANT_SPELL = YES | |
| 43 | |
| 5704 | 44 # Comment out if you want to run mzschema tests. |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
45 # It fails because VMS does not support this feature yet. |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
46 # WANT_MZSCH = YES |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
47 |
| 6398 | 48 # Comment out if you have ODS-5 file system |
| 5704 | 49 # HAVE_ODS5 = YES |
| 50 | |
| 7 | 51 # Comment out if you have gzip on your system |
| 52 # HAVE_GZIP = YES | |
| 53 | |
| 54 # Comment out if you have GNU compatible diff on your system | |
| 55 # HAVE_GDIFF = YES | |
| 56 | |
| 6398 | 57 # Comment out if you have ICONV support |
| 5704 | 58 # HAVE_ICONV = YES |
| 59 | |
| 60 # Comment out if you have LUA support | |
| 61 # HAVE_LUA = YES | |
| 62 | |
| 63 # Comment out if you have PYTHON support | |
| 64 # HAVE_PYTHON = YES | |
| 65 | |
| 7 | 66 ####################################################################### |
| 67 # End of configuration section. | |
| 68 # | |
| 69 # Please, do not change anything below without programming experience. | |
| 70 ####################################################################### | |
| 71 | |
| 72 VIMPROG = <->vim.exe | |
| 73 | |
| 74 .SUFFIXES : .out .in | |
| 75 | |
|
16865
d615cc95089c
patch 8.1.1434: test 3 is old style
Bram Moolenaar <Bram@vim.org>
parents:
16821
diff
changeset
|
76 SCRIPT = test1.out \ |
|
16821
140bf183f946
patch 8.1.1412: test 30 is old style
Bram Moolenaar <Bram@vim.org>
parents:
16710
diff
changeset
|
77 test39.out \ |
|
12750
0b6c09957b43
patch 8.0.1253: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
12686
diff
changeset
|
78 test42.out test44.out test48.out test49.out \ |
|
12851
90aaa974594e
patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
12788
diff
changeset
|
79 test64.out test69.out \ |
|
12686
aa658b33f25a
patch 8.0.1221: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
12662
diff
changeset
|
80 test72.out test77a.out test88.out \ |
|
16350
ffa791471a4c
patch 8.1.1180: Vim script debugger tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
14339
diff
changeset
|
81 test94.out test95.out test99.out \ |
|
13022
71109531c516
patch 8.0.1387: wordcount test is old style
Christian Brabandt <cb@256bit.org>
parents:
12851
diff
changeset
|
82 test_eval.out |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
83 |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
84 # Known problems: |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
85 # |
|
11551
7798e9bcdb13
patch 8.0.0658: spell test is old style
Christian Brabandt <cb@256bit.org>
parents:
11461
diff
changeset
|
86 # test59: Failed/Hangs - VMS does not support spell files (file names |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
87 # with too many dots). |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
88 # |
| 5704 | 89 # test72: bug - Vim hangs at :rename (while rename works well otherwise) |
| 90 # test78: bug - Vim dies at :recover Xtest | |
| 91 # test89: bug - findfile() does not work on VMS (just in the current directory) | |
|
11651
140d51d5b5c3
patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
11603
diff
changeset
|
92 # test102: Just ODS-5 supports space and special chars in the filename. |
| 5704 | 93 # On ODS-2 tests fail. |
| 7 | 94 |
| 95 .IFDEF WANT_GUI | |
|
10328
299f1669c20e
commit https://github.com/vim/vim/commit/de5e2c219b99895445fb75ae3541ee69282a5846
Christian Brabandt <cb@256bit.org>
parents:
9756
diff
changeset
|
96 SCRIPT_GUI = test16.out |
| 7 | 97 GUI_OPTION = -g |
| 98 .ENDIF | |
| 99 | |
| 100 .IFDEF WANT_UNIX | |
|
16564
6d9461653dc5
patch 8.1.1285: test17 is old style
Bram Moolenaar <Bram@vim.org>
parents:
16419
diff
changeset
|
101 SCRIPT_UNIX = test10.out test27.out test49.out |
| 1709 | 102 .ENDIF |
| 103 | |
| 104 .IFDEF WANT_WIN | |
|
13146
d9a94be389b5
patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
13022
diff
changeset
|
105 SCRIPT_WIN = test52.out |
| 1709 | 106 .ENDIF |
| 107 | |
| 108 .IFDEF WANT_SPELL | |
|
11551
7798e9bcdb13
patch 8.0.0658: spell test is old style
Christian Brabandt <cb@256bit.org>
parents:
11461
diff
changeset
|
109 SCRIPT_SPELL = test59.out |
| 7 | 110 .ENDIF |
| 111 | |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
112 .IFDEF WANT_MZSCH |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
113 SCRIPT_MZSCH = test70.out |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
114 .ENDIF |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
115 |
|
14230
2e95ea9afa1e
patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents:
13146
diff
changeset
|
116 .IFDEF HAVE_ODS5 |
|
2e95ea9afa1e
patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents:
13146
diff
changeset
|
117 SCRIPT_ODS5 = test102.out |
|
2e95ea9afa1e
patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents:
13146
diff
changeset
|
118 .ENDIF |
| 5704 | 119 |
| 7 | 120 .IFDEF HAVE_GDIFF |
| 121 SCRIPT_GDIFF = test47.out | |
| 122 .ENDIF | |
| 123 | |
| 5704 | 124 .IFDEF HAVE_PYTHON |
| 125 SCRIPT_PYTHON = test86.out test87.out | |
| 126 .ENDIF | |
| 127 | |
| 7 | 128 .in.out : |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
129 -@ !clean up before doing the test |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
130 -@ if "''F$SEARCH("test.out.*")'" .NES. "" then delete/noconfirm/nolog test.out.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
131 -@ if "''F$SEARCH("$*.out.*")'" .NES. "" then delete/noconfirm/nolog $*.out.* |
| 5704 | 132 -@ ! define TMP if not set - some tests use it |
| 133 -@ if "''F$TRNLNM("TMP")'" .EQS. "" then define/nolog TMP [] | |
| 7 | 134 -@ write sys$output " " |
| 135 -@ write sys$output "-----------------------------------------------" | |
| 136 -@ write sys$output " "$*" " | |
| 137 -@ write sys$output "-----------------------------------------------" | |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
138 -@ !run the test |
|
10328
299f1669c20e
commit https://github.com/vim/vim/commit/de5e2c219b99895445fb75ae3541ee69282a5846
Christian Brabandt <cb@256bit.org>
parents:
9756
diff
changeset
|
139 -@ create/term/wait/nodetach mcr $(VIMPROG) $(GUI_OPTION) -u vms.vim --noplugin -s dotest.in $*.in |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
140 -@ !analyse the result |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
141 -@ directory /size/date test.out |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
142 -@ if "''F$SEARCH("test.out.*")'" .NES. "" then rename/nolog test.out $*.out |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
143 -@ if "''F$SEARCH("$*.out.*")'" .NES. "" then differences /par $*.out $*.ok; |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
144 -@ !clean up after the test |
| 7 | 145 -@ if "''F$SEARCH("Xdotest.*")'" .NES. "" then delete/noconfirm/nolog Xdotest.*.* |
| 5704 | 146 -@ if "''F$SEARCH("Xtest.*")'" .NES. "" then delete/noconfirm/nolog Xtest.*.* |
| 7 | 147 |
|
16397
7a942d92980d
patch 8.1.1203: some autocmd tests are old style
Bram Moolenaar <Bram@vim.org>
parents:
16350
diff
changeset
|
148 all : clean nolog $(START_WITH) $(SCRIPT) $(SCRIPT_GUI) $(SCRIPT_UNIX) $(SCRIPT_WIN) $(SCRIPT_SPELL) $(SCRIPT_ODS5) \ |
|
12750
0b6c09957b43
patch 8.0.1253: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
12686
diff
changeset
|
149 $(SCRIPT_GDIFF) $(SCRIPT_MZSCH) $(SCRIPT_LUA) $(SCRIPT_PYTHON) nolog |
| 7 | 150 -@ write sys$output " " |
| 151 -@ write sys$output "-----------------------------------------------" | |
| 152 -@ write sys$output " All done" | |
| 153 -@ write sys$output "-----------------------------------------------" | |
| 154 -@ deassign sys$output | |
| 155 -@ delete/noconfirm/nolog x*.*.* | |
| 156 -@ type test.log | |
| 157 | |
| 158 nolog : | |
| 159 -@ define sys$output test.log | |
| 160 -@ write sys$output "-----------------------------------------------" | |
| 161 -@ write sys$output " Standard VIM test cases" | |
| 162 -@ write sys$output "-----------------------------------------------" | |
| 163 -@ write sys$output " OpenVMS version: ''F$GETSYI("VERSION")'" | |
| 164 -@ write sys$output " Vim version:" | |
| 165 -@ mcr $(VIMPROG) --version | |
| 166 -@ write sys$output " Test date:" | |
| 167 -@ show time | |
| 168 -@ write sys$output "-----------------------------------------------" | |
| 169 -@ write sys$output " Test results:" | |
| 170 -@ write sys$output "-----------------------------------------------" | |
| 171 -@ write sys$output "MAKE_VMS.MMS options:" | |
| 5704 | 172 -@ write sys$output " WANT_GUI = ""$(WANT_GUI)"" " |
| 173 -@ write sys$output " WANT_UNIX = ""$(WANT_UNIX)"" " | |
| 174 -@ write sys$output " WANT_WIN = ""$(WANT_WIN)"" " | |
| 175 -@ write sys$output " WANT_SPELL = ""$(WANT_SPELL)"" " | |
| 176 -@ write sys$output " WANT_MZSCH = ""$(WANT_MZSCH)"" " | |
| 177 -@ write sys$output " HAVE_ODS5 = ""$(HAVE_ODS5)"" " | |
| 178 -@ write sys$output " HAVE_GZIP = ""$(HAVE_GZIP)"" " | |
| 179 -@ write sys$output " HAVE_GDIFF = ""$(HAVE_GDIFF)"" " | |
| 180 -@ write sys$output " HAVE_ICONV = ""$(HAVE_ICONV)"" " | |
| 181 -@ write sys$output " HAVE_LUA = ""$(HAVE_LUA)"" " | |
| 182 -@ write sys$output " HAVE_PYTHON= ""$(HAVE_PYTHON)"" " | |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
183 -@ write sys$output "Default vimrc file is VMS.VIM:" |
| 7 | 184 -@ write sys$output "-----------------------------------------------" |
| 185 -@ type VMS.VIM | |
| 186 | |
| 187 clean : | |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
188 -@ if "''F$SEARCH("*.out")'" .NES. "" then delete/noconfirm/nolog *.out.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
189 -@ if "''F$SEARCH("test.log")'" .NES. "" then delete/noconfirm/nolog test.log.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
190 -@ if "''F$SEARCH("test.ok")'" .NES. "" then delete/noconfirm/nolog test.ok.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
191 -@ if "''F$SEARCH("Xdotest.*")'" .NES. "" then delete/noconfirm/nolog Xdotest.*.* |
| 5704 | 192 -@ if "''F$SEARCH("Xtest*.*")'" .NES. "" then delete/noconfirm/nolog Xtest*.*.* |
| 193 -@ if "''F$SEARCH("XX*.*")'" .NES. "" then delete/noconfirm/nolog XX*.*.* | |
| 194 -@ if "''F$SEARCH("_un_*.*")'" .NES. "" then delete/noconfirm/nolog _un_*.*.* | |
|
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
195 -@ if "''F$SEARCH("*.*_sw*")'" .NES. "" then delete/noconfirm/nolog *.*_sw*.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
196 -@ if "''F$SEARCH("*.failed")'" .NES. "" then delete/noconfirm/nolog *.failed.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
197 -@ if "''F$SEARCH("*.rej")'" .NES. "" then delete/noconfirm/nolog *.rej.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
198 -@ if "''F$SEARCH("tiny.vim")'" .NES. "" then delete/noconfirm/nolog tiny.vim.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
199 -@ if "''F$SEARCH("small.vim")'" .NES. "" then delete/noconfirm/nolog small.vim.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
200 -@ if "''F$SEARCH("mbyte.vim")'" .NES. "" then delete/noconfirm/nolog mbyte.vim.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
201 -@ if "''F$SEARCH("mzscheme.vim")'" .NES. "" then delete/noconfirm/nolog mzscheme.vim.* |
|
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
202 -@ if "''F$SEARCH("viminfo.*")'" .NES. "" then delete/noconfirm/nolog viminfo.*.* |
| 1709 | 203 |