Mercurial > vim
annotate src/testdir/Make_vms.mms @ 16326:1679b9f54946 v8.1.1168
patch 8.1.1168: not all screen update code of terminal is executed in tests
commit https://github.com/vim/vim/commit/87dcfd75c218107ca966c80a0a56b236be046fc9
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Apr 13 22:35:29 2019 +0200
patch 8.1.1168: not all screen update code of terminal is executed in tests
Problem: Not all screen update code of the terminal window is executed in
tests.
Solution: Redraw before taking a screenshot.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sat, 13 Apr 2019 22:45:04 +0200 |
parents | 43b8795f1ddf |
children | ffa791471a4c |
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 # | |
10328
299f1669c20e
commit https://github.com/vim/vim/commit/de5e2c219b99895445fb75ae3541ee69282a5846
Christian Brabandt <cb@256bit.org>
parents:
9756
diff
changeset
|
7 # Last change: 2016 Nov 04 |
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 | |
12616
4767939d10cc
patch 8.0.1186: still quite a few old style tests
Christian Brabandt <cb@256bit.org>
parents:
12560
diff
changeset
|
76 SCRIPT = test1.out test3.out \ |
13146
d9a94be389b5
patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
13022
diff
changeset
|
77 test14.out \ |
12750
0b6c09957b43
patch 8.0.1253: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
12686
diff
changeset
|
78 test29.out \ |
13146
d9a94be389b5
patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
13022
diff
changeset
|
79 test30.out test37.out test39.out \ |
12750
0b6c09957b43
patch 8.0.1253: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
12686
diff
changeset
|
80 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
|
81 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
|
82 test72.out test77a.out test88.out \ |
12750
0b6c09957b43
patch 8.0.1253: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
12686
diff
changeset
|
83 test94.out test95.out test99.out test108.out \ |
13022
71109531c516
patch 8.0.1387: wordcount test is old style
Christian Brabandt <cb@256bit.org>
parents:
12851
diff
changeset
|
84 test_eval.out |
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
85 |
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
86 # Known problems: |
5704 | 87 # test17: ? |
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
88 # |
5704 | 89 # test30: bug, most probably - a problem around mac format |
90 # | |
11551
7798e9bcdb13
patch 8.0.0658: spell test is old style
Christian Brabandt <cb@256bit.org>
parents:
11461
diff
changeset
|
91 # 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
|
92 # with too many dots). |
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
93 # |
5704 | 94 # test72: bug - Vim hangs at :rename (while rename works well otherwise) |
95 # test78: bug - Vim dies at :recover Xtest | |
96 # 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
|
97 # test102: Just ODS-5 supports space and special chars in the filename. |
5704 | 98 # On ODS-2 tests fail. |
7 | 99 |
100 .IFDEF WANT_GUI | |
10328
299f1669c20e
commit https://github.com/vim/vim/commit/de5e2c219b99895445fb75ae3541ee69282a5846
Christian Brabandt <cb@256bit.org>
parents:
9756
diff
changeset
|
101 SCRIPT_GUI = test16.out |
7 | 102 GUI_OPTION = -g |
103 .ENDIF | |
104 | |
105 .IFDEF WANT_UNIX | |
12851
90aaa974594e
patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
12788
diff
changeset
|
106 SCRIPT_UNIX = test10.out test17.out test27.out test49.out |
1709 | 107 .ENDIF |
108 | |
109 .IFDEF WANT_WIN | |
13146
d9a94be389b5
patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
13022
diff
changeset
|
110 SCRIPT_WIN = test52.out |
1709 | 111 .ENDIF |
112 | |
113 .IFDEF WANT_SPELL | |
11551
7798e9bcdb13
patch 8.0.0658: spell test is old style
Christian Brabandt <cb@256bit.org>
parents:
11461
diff
changeset
|
114 SCRIPT_SPELL = test59.out |
7 | 115 .ENDIF |
116 | |
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
117 .IFDEF WANT_MZSCH |
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
118 SCRIPT_MZSCH = test70.out |
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
119 .ENDIF |
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
120 |
14230
2e95ea9afa1e
patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents:
13146
diff
changeset
|
121 .IFDEF HAVE_ODS5 |
2e95ea9afa1e
patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents:
13146
diff
changeset
|
122 SCRIPT_ODS5 = test102.out |
2e95ea9afa1e
patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents:
13146
diff
changeset
|
123 .ENDIF |
5704 | 124 |
7 | 125 .IFDEF HAVE_GZIP |
126 SCRIPT_GZIP = test11.out | |
127 .ENDIF | |
128 | |
129 .IFDEF HAVE_GDIFF | |
130 SCRIPT_GDIFF = test47.out | |
131 .ENDIF | |
132 | |
5704 | 133 .IFDEF HAVE_PYTHON |
134 SCRIPT_PYTHON = test86.out test87.out | |
135 .ENDIF | |
136 | |
7 | 137 .in.out : |
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
138 -@ !clean up before doing the test |
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
139 -@ 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
|
140 -@ if "''F$SEARCH("$*.out.*")'" .NES. "" then delete/noconfirm/nolog $*.out.* |
5704 | 141 -@ ! define TMP if not set - some tests use it |
142 -@ if "''F$TRNLNM("TMP")'" .EQS. "" then define/nolog TMP [] | |
7 | 143 -@ write sys$output " " |
144 -@ write sys$output "-----------------------------------------------" | |
145 -@ write sys$output " "$*" " | |
146 -@ write sys$output "-----------------------------------------------" | |
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
147 -@ !run the test |
10328
299f1669c20e
commit https://github.com/vim/vim/commit/de5e2c219b99895445fb75ae3541ee69282a5846
Christian Brabandt <cb@256bit.org>
parents:
9756
diff
changeset
|
148 -@ 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
|
149 -@ !analyse the result |
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
150 -@ directory /size/date test.out |
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
151 -@ 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
|
152 -@ 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
|
153 -@ !clean up after the test |
7 | 154 -@ if "''F$SEARCH("Xdotest.*")'" .NES. "" then delete/noconfirm/nolog Xdotest.*.* |
5704 | 155 -@ if "''F$SEARCH("Xtest.*")'" .NES. "" then delete/noconfirm/nolog Xtest.*.* |
7 | 156 |
10328
299f1669c20e
commit https://github.com/vim/vim/commit/de5e2c219b99895445fb75ae3541ee69282a5846
Christian Brabandt <cb@256bit.org>
parents:
9756
diff
changeset
|
157 all : clean nolog $(START_WITH) $(SCRIPT) $(SCRIPT_GUI) $(SCRIPT_UNIX) $(SCRIPT_WIN) $(SCRIPT_SPELL) $(SCRIPT_ODS5) $(SCRIPT_GZIP) \ |
12750
0b6c09957b43
patch 8.0.1253: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
12686
diff
changeset
|
158 $(SCRIPT_GDIFF) $(SCRIPT_MZSCH) $(SCRIPT_LUA) $(SCRIPT_PYTHON) nolog |
7 | 159 -@ write sys$output " " |
160 -@ write sys$output "-----------------------------------------------" | |
161 -@ write sys$output " All done" | |
162 -@ write sys$output "-----------------------------------------------" | |
163 -@ deassign sys$output | |
164 -@ delete/noconfirm/nolog x*.*.* | |
165 -@ type test.log | |
166 | |
167 nolog : | |
168 -@ define sys$output test.log | |
169 -@ write sys$output "-----------------------------------------------" | |
170 -@ write sys$output " Standard VIM test cases" | |
171 -@ write sys$output "-----------------------------------------------" | |
172 -@ write sys$output " OpenVMS version: ''F$GETSYI("VERSION")'" | |
173 -@ write sys$output " Vim version:" | |
174 -@ mcr $(VIMPROG) --version | |
175 -@ write sys$output " Test date:" | |
176 -@ show time | |
177 -@ write sys$output "-----------------------------------------------" | |
178 -@ write sys$output " Test results:" | |
179 -@ write sys$output "-----------------------------------------------" | |
180 -@ write sys$output "MAKE_VMS.MMS options:" | |
5704 | 181 -@ write sys$output " WANT_GUI = ""$(WANT_GUI)"" " |
182 -@ write sys$output " WANT_UNIX = ""$(WANT_UNIX)"" " | |
183 -@ write sys$output " WANT_WIN = ""$(WANT_WIN)"" " | |
184 -@ write sys$output " WANT_SPELL = ""$(WANT_SPELL)"" " | |
185 -@ write sys$output " WANT_MZSCH = ""$(WANT_MZSCH)"" " | |
186 -@ write sys$output " HAVE_ODS5 = ""$(HAVE_ODS5)"" " | |
187 -@ write sys$output " HAVE_GZIP = ""$(HAVE_GZIP)"" " | |
188 -@ write sys$output " HAVE_GDIFF = ""$(HAVE_GDIFF)"" " | |
189 -@ write sys$output " HAVE_ICONV = ""$(HAVE_ICONV)"" " | |
190 -@ write sys$output " HAVE_LUA = ""$(HAVE_LUA)"" " | |
191 -@ write sys$output " HAVE_PYTHON= ""$(HAVE_PYTHON)"" " | |
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
192 -@ write sys$output "Default vimrc file is VMS.VIM:" |
7 | 193 -@ write sys$output "-----------------------------------------------" |
194 -@ type VMS.VIM | |
195 | |
196 clean : | |
2441
620a42739426
Improvements for VMS. (Zoltan Arpadffy)
Bram Moolenaar <bram@vim.org>
parents:
2436
diff
changeset
|
197 -@ 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
|
198 -@ 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
|
199 -@ 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
|
200 -@ if "''F$SEARCH("Xdotest.*")'" .NES. "" then delete/noconfirm/nolog Xdotest.*.* |
5704 | 201 -@ if "''F$SEARCH("Xtest*.*")'" .NES. "" then delete/noconfirm/nolog Xtest*.*.* |
202 -@ if "''F$SEARCH("XX*.*")'" .NES. "" then delete/noconfirm/nolog XX*.*.* | |
203 -@ 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
|
204 -@ 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
|
205 -@ 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
|
206 -@ 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
|
207 -@ 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
|
208 -@ 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
|
209 -@ 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
|
210 -@ 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
|
211 -@ if "''F$SEARCH("viminfo.*")'" .NES. "" then delete/noconfirm/nolog viminfo.*.* |
1709 | 212 |