Mercurial > vim

annotate src/testdir/test_regex_char_classes.vim @ 13146:d9a94be389b5 v8.0.1447

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.0.1447: still too many old style tests commit https://github.com/vim/vim/commit/cada78975eebc47f9b12de1a471639b5afd9ad2f Author: Bram Moolenaar <Bram@vim.org> Date: Wed Jan 31 19:30:24 2018 +0100 patch 8.0.1447: still too many old style tests Problem: Still too many old style tests. Solution: Turn a few tests into new style. (Yegappan Lakshmanan, closes #2509)
author Christian Brabandt <cb@256bit.org>
date Wed, 31 Jan 2018 19:45:05 +0100
parents 140d51d5b5c3
children 2dcaa860e3fc
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
11651
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Tests for regexp with backslash and other special characters inside []
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2 " Also test backslash for hex/octal numbered character.
13146
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
3 "
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
4 if !has('multi_byte')
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
5 finish
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
6 endif
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
7
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
8 scriptencoding utf-8
11651
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 function RunSTest(value, calls, expected)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 new
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 call feedkeys("i" . a:value, "mx")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 exec a:calls
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 call assert_equal(a:expected, getline(1), printf("wrong result for %s", a:calls))
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
15 quit!
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 endfunction
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 function RunXTest(value, search_exp, expected)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
19 new
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20 call feedkeys("i" . a:value, "mx")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21 call feedkeys("gg" . a:search_exp . "\nx", "mx")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 call assert_equal(a:expected, getline(1), printf("wrong result for %s", a:search_exp))
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 quit!
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 endfunction
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 function Test_x_search()
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 let res = "test text test text"
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 call RunXTest("test \\text test text", "/[\\x]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 call RunXTest("test \ttext test text", "/[\\t\\]]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31 call RunXTest("test text ]test text", "/[]y]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
32 call RunXTest("test ]text test text", "/[\\]]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
33 call RunXTest("test text te^st text", "/[y^]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
34 call RunXTest("test te$xt test text", "/[$y]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 call RunXTest("test taext test text", "/[\\x61]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
36 call RunXTest("test tbext test text","/[\\x60-\\x64]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
37 call RunXTest("test 5text test text","/[\\x785]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
38 call RunXTest("testc text test text","/[\\o143]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
39 call RunXTest("tesdt text test text","/[\\o140-\\o144]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
40 call RunXTest("test7 text test text", "/[\\o417]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
41 call RunXTest("test text tBest text", "/\\%x42", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
42 call RunXTest("test text teCst text", "/\\%o103", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
43 call RunXTest("test text \<C-V>x00test text", "/[\\x00]", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
44 endfunction
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
45
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
46 function Test_s_search()
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
47 let res = "test text test text"
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
48 call RunSTest("test te\<C-V>x00xt t\<C-V>x04est t\<C-V>x10ext", "s/[\\x00-\\x10]//g", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
49 call RunSTest("test \\xyztext test text", "s/[\\x-z]\\+//", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
50 call RunSTest("test text tev\\uyst text", "s/[\\u-z]\\{2,}//", res)
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
51 call RunSTest("xx aaaaa xx a", "s/\\(a\\)\\+//", "xx xx a")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
52 call RunSTest("xx aaaaa xx a", "s/\\(a*\\)\\+//", "xx aaaaa xx a")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
53 call RunSTest("xx aaaaa xx a", "s/\\(a*\\)*//", "xx aaaaa xx a")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
54 call RunSTest("xx aaaaa xx", "s/\\(a\\)\\{2,3}/A/", "xx Aaa xx")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
55 call RunSTest("xx aaaaa xx", "s/\\(a\\)\\{-2,3}/A/", "xx Aaaa xx")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
56 call RunSTest("xx aaa12aa xx", "s/\\(a\\)*\\(12\\)\\@>/A/", "xx Aaa xx")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
57 call RunSTest("xx foobar xbar xx", "s/\\(foo\\)\\@<!bar/A/", "xx foobar xA xx")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
58 call RunSTest("xx an file xx", "s/\\(an\\_s\\+\\)\\@<=file/A/", "xx an A xx")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
59 call RunSTest("x= 9;", "s/^\\(\\h\\w*\\%(->\\|\\.\\)\\=\\)\\+=/XX/", "XX 9;")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
60 call RunSTest("hh= 77;", "s/^\\(\\h\\w*\\%(->\\|\\.\\)\\=\\)\\+=/YY/", "YY 77;")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
61 call RunSTest(" aaa ", "s/aaa/xyz/", " xyz ")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
62 call RunSTest(" xyz", "s/~/bcd/", " bcd")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
63 call RunSTest(" bcdbcdbcd", "s/~\\+/BB/", " BB")
140d51d5b5c3 patch 8.0.0708: some tests are old style
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
64 endfunction
13146
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
65
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
66 " Test character classes in regexp using regexpengine 0, 1, 2.
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
67 func Test_regex_char_classes()
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
68 new
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
69 let save_enc = &encoding
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
70 set encoding=utf-8
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
71
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
72 let input = "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
73
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
74 " Format is [cmd_to_run, expected_output]
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
75 let tests = [
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
76 \ [':s/\%#=0\d//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
77 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
78 \ [':s/\%#=1\d//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
79 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
80 \ [':s/\%#=2\d//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
81 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
82 \ [':s/\%#=0[0-9]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
83 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
84 \ [':s/\%#=1[0-9]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
85 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
86 \ [':s/\%#=2[0-9]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
87 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
88 \ [':s/\%#=0\D//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
89 \ "0123456789"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
90 \ [':s/\%#=1\D//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
91 \ "0123456789"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
92 \ [':s/\%#=2\D//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
93 \ "0123456789"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
94 \ [':s/\%#=0[^0-9]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
95 \ "0123456789"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
96 \ [':s/\%#=1[^0-9]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
97 \ "0123456789"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
98 \ [':s/\%#=2[^0-9]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
99 \ "0123456789"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
100 \ [':s/\%#=0\o//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
101 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./89:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
102 \ [':s/\%#=1\o//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
103 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./89:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
104 \ [':s/\%#=2\o//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
105 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./89:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
106 \ [':s/\%#=0[0-7]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
107 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./89:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
108 \ [':s/\%#=1[0-7]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
109 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./89:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
110 \ [':s/\%#=2[0-7]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
111 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./89:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
112 \ [':s/\%#=0\O//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
113 \ "01234567"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
114 \ [':s/\%#=1\O//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
115 \ "01234567"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
116 \ [':s/\%#=2\O//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
117 \ "01234567"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
118 \ [':s/\%#=0[^0-7]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
119 \ "01234567"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
120 \ [':s/\%#=1[^0-7]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
121 \ "01234567"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
122 \ [':s/\%#=2[^0-7]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
123 \ "01234567"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
124 \ [':s/\%#=0\x//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
125 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@GHIXYZ[\]^_`ghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
126 \ [':s/\%#=1\x//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
127 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@GHIXYZ[\]^_`ghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
128 \ [':s/\%#=2\x//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
129 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@GHIXYZ[\]^_`ghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
130 \ [':s/\%#=0[0-9A-Fa-f]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
131 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@GHIXYZ[\]^_`ghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
132 \ [':s/\%#=1[0-9A-Fa-f]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
133 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@GHIXYZ[\]^_`ghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
134 \ [':s/\%#=2[0-9A-Fa-f]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
135 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@GHIXYZ[\]^_`ghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
136 \ [':s/\%#=0\X//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
137 \ "0123456789ABCDEFabcdef"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
138 \ [':s/\%#=1\X//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
139 \ "0123456789ABCDEFabcdef"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
140 \ [':s/\%#=2\X//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
141 \ "0123456789ABCDEFabcdef"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
142 \ [':s/\%#=0[^0-9A-Fa-f]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
143 \ "0123456789ABCDEFabcdef"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
144 \ [':s/\%#=1[^0-9A-Fa-f]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
145 \ "0123456789ABCDEFabcdef"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
146 \ [':s/\%#=2[^0-9A-Fa-f]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
147 \ "0123456789ABCDEFabcdef"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
148 \ [':s/\%#=0\w//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
149 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
150 \ [':s/\%#=1\w//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
151 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
152 \ [':s/\%#=2\w//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
153 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
154 \ [':s/\%#=0[0-9A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
155 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
156 \ [':s/\%#=1[0-9A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
157 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
158 \ [':s/\%#=2[0-9A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
159 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
160 \ [':s/\%#=0\W//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
161 \ "0123456789ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
162 \ [':s/\%#=1\W//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
163 \ "0123456789ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
164 \ [':s/\%#=2\W//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
165 \ "0123456789ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
166 \ [':s/\%#=0[^0-9A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
167 \ "0123456789ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
168 \ [':s/\%#=1[^0-9A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
169 \ "0123456789ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
170 \ [':s/\%#=2[^0-9A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
171 \ "0123456789ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
172 \ [':s/\%#=0\h//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
173 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
174 \ [':s/\%#=1\h//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
175 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
176 \ [':s/\%#=2\h//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
177 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
178 \ [':s/\%#=0[A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
179 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
180 \ [':s/\%#=1[A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
181 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
182 \ [':s/\%#=2[A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
183 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
184 \ [':s/\%#=0\H//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
185 \ "ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
186 \ [':s/\%#=1\H//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
187 \ "ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
188 \ [':s/\%#=2\H//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
189 \ "ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
190 \ [':s/\%#=0[^A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
191 \ "ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
192 \ [':s/\%#=1[^A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
193 \ "ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
194 \ [':s/\%#=2[^A-Za-z_]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
195 \ "ABCDEFGHIXYZ_abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
196 \ [':s/\%#=0\a//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
197 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
198 \ [':s/\%#=1\a//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
199 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
200 \ [':s/\%#=2\a//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
201 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
202 \ [':s/\%#=0[A-Za-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
203 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
204 \ [':s/\%#=1[A-Za-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
205 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
206 \ [':s/\%#=2[A-Za-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
207 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
208 \ [':s/\%#=0\A//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
209 \ "ABCDEFGHIXYZabcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
210 \ [':s/\%#=1\A//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
211 \ "ABCDEFGHIXYZabcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
212 \ [':s/\%#=2\A//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
213 \ "ABCDEFGHIXYZabcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
214 \ [':s/\%#=0[^A-Za-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
215 \ "ABCDEFGHIXYZabcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
216 \ [':s/\%#=1[^A-Za-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
217 \ "ABCDEFGHIXYZabcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
218 \ [':s/\%#=2[^A-Za-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
219 \ "ABCDEFGHIXYZabcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
220 \ [':s/\%#=0\l//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
221 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
222 \ [':s/\%#=1\l//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
223 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
224 \ [':s/\%#=2\l//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
225 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
226 \ [':s/\%#=0[a-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
227 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
228 \ [':s/\%#=1[a-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
229 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
230 \ [':s/\%#=2[a-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
231 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
232 \ [':s/\%#=0\L//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
233 \ "abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
234 \ [':s/\%#=1\L//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
235 \ "abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
236 \ [':s/\%#=2\L//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
237 \ "abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
238 \ [':s/\%#=0[^a-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
239 \ "abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
240 \ [':s/\%#=1[^a-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
241 \ "abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
242 \ [':s/\%#=2[^a-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
243 \ "abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
244 \ [':s/\%#=0\u//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
245 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
246 \ [':s/\%#=1\u//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
247 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
248 \ [':s/\%#=2\u//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
249 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
250 \ [':s/\%#=0[A-Z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
251 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
252 \ [':s/\%#=1[A-Z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
253 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
254 \ [':s/\%#=2[A-Z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
255 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./0123456789:;<=>?@[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
256 \ [':s/\%#=0\U//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
257 \ "ABCDEFGHIXYZ"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
258 \ [':s/\%#=1\U//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
259 \ "ABCDEFGHIXYZ"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
260 \ [':s/\%#=2\U//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
261 \ "ABCDEFGHIXYZ"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
262 \ [':s/\%#=0[^A-Z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
263 \ "ABCDEFGHIXYZ"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
264 \ [':s/\%#=1[^A-Z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
265 \ "ABCDEFGHIXYZ"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
266 \ [':s/\%#=2[^A-Z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
267 \ "ABCDEFGHIXYZ"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
268 \ [':s/\%#=0\%' . line('.') . 'l^\t...//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
269 \ "!\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
270 \ [':s/\%#=1\%' . line('.') . 'l^\t...//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
271 \ "!\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
272 \ [':s/\%#=2\%' . line('.') . 'l^\t...//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
273 \ "!\"#$%&'()#+'-./0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
274 \ [':s/\%#=0[0-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
275 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
276 \ [':s/\%#=1[0-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
277 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
278 \ [':s/\%#=2[0-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
279 \ "\t\<C-L>\<C-M> !\"#$%&'()#+'-./{|}~\<C-?>\u0080\u0082\u0090\u009bΡ记娱"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
280 \ [':s/\%#=0[^0-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
281 \ "0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
282 \ [':s/\%#=1[^0-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
283 \ "0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz"],
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
284 \ [':s/\%#=2[^0-z]//g',
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
285 \ "0123456789:;<=>?@ABCDEFGHIXYZ[\]^_`abcdefghiwxyz"]
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
286 \]
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
287
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
288 for [cmd, expected] in tests
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
289 call append(0, input)
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
290 call cursor(1, 1)
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
291 exe cmd
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
292 call assert_equal(expected, getline(1), cmd)
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
293 endfor
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
294
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
295 let &encoding = save_enc
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
296 enew!
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
297 close
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 11651
diff changeset
298 endfunc