annotate src/testdir/test_textformat.vim @ 19231:b8fd7364befd v8.2.0174

patch 8.2.0174: various commands not completely tested Commit: https://github.com/vim/vim/commit/5d98dc2a48156d44139b75c689bd3137ff7fe8bf Author: Bram Moolenaar <Bram@vim.org> Date: Wed Jan 29 21:57:34 2020 +0100 patch 8.2.0174: various commands not completely tested Problem: Various commands not completely tested. Solution: Add more test cases. (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/5551)
author Bram Moolenaar <Bram@vim.org>
date Wed, 29 Jan 2020 22:00:04 +0100
parents e8fe65da4198
children e053bf71b998
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
12851
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Tests for the various 'formatoptions' settings
18408
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
2
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
3 source check.vim
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
4
12851
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5 func Test_text_format()
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 enew!
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8 setl noai tw=2 fo=t
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 \ '{',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 \ ' ',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 \ '',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 \ '}'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 exe "normal /^{/+1\n0"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
15 normal gRa b
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 let lnum = line('.')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 \ 'a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
19 \ 'b'], getline(lnum - 1, lnum))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 setl ai tw=2 fo=tw
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 \ '{',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25 \ 'a b ',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 \ '',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 \ 'a ',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 \ '}'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 exe "normal /^{/+1\n0"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 normal gqgqjjllab
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31 let lnum = line('.')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
32 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
33 \ 'a ',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
34 \ 'b ',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 \ '',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
36 \ 'a ',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
37 \ 'b'], getline(lnum - 4, lnum))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
38
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
39 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
40 setl tw=3 fo=t
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
41 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
42 \ '{',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
43 \ "a \<C-A>",
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
44 \ '}'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
45 exe "normal /^{/+1\n0"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
46 exe "normal gqgqo\na \<C-V>\<C-A>"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
47 let lnum = line('.')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
48 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
49 \ 'a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
50 \ "\<C-A>",
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
51 \ '',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
52 \ 'a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
53 \ "\<C-A>"], getline(lnum - 4, lnum))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
54
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
55 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
56 setl tw=2 fo=tcq1 comments=:#
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
57 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
58 \ '{',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
59 \ 'a b',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
60 \ '#a b',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
61 \ '}'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
62 exe "normal /^{/+1\n0"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
63 exe "normal gqgqjgqgqo\na b\n#a b"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
64 let lnum = line('.')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
65 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
66 \ 'a b',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
67 \ '#a b',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
68 \ '',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
69 \ 'a b',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
70 \ '#a b'], getline(lnum - 4, lnum))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
71
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
72 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
73 setl tw=5 fo=tcn comments=:#
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
74 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
75 \ '{',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
76 \ ' 1 a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
77 \ '# 1 a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
78 \ '}'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
79 exe "normal /^{/+1\n0"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
80 exe "normal A b\<Esc>jA b"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
81 let lnum = line('.')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
82 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
83 \ ' 1 a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
84 \ ' b',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
85 \ '# 1 a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
86 \ '# b'], getline(lnum - 3, lnum))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
87
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
88 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
89 setl tw=5 fo=t2a si
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
90 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
91 \ '{',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
92 \ '',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
93 \ ' x a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
94 \ ' b',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
95 \ ' c',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
96 \ '',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
97 \ '}'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
98 exe "normal /^{/+3\n0"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
99 exe "normal i \<Esc>A_"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
100 let lnum = line('.')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
101 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
102 \ '',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
103 \ ' x a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
104 \ ' b_',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
105 \ ' c',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
106 \ ''], getline(lnum - 2, lnum + 2))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
107
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
108 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
109 setl tw=5 fo=qn comments=:#
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
110 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
111 \ '{',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
112 \ '# 1 a b',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
113 \ '}'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
114 exe "normal /^{/+1\n5|"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
115 normal gwap
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
116 call assert_equal(5, col('.'))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
117 let lnum = line('.')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
118 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
119 \ '# 1 a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
120 \ '# b'], getline(lnum, lnum + 1))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
121
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
122 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
123 setl tw=5 fo=q2 comments=:#
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
124 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
125 \ '{',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
126 \ '# x',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
127 \ '# a b',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
128 \ '}'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
129 exe "normal /^{/+1\n0"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
130 normal gwap
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
131 let lnum = line('.')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
132 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
133 \ '# x a',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
134 \ '# b'], getline(lnum, lnum + 1))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
135
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
136 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
137 setl tw& fo=a
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
138 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
139 \ '{',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
140 \ ' 1aa',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
141 \ ' 2bb',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
142 \ '}'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
143 exe "normal /^{/+2\n0"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
144 normal I^^
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
145 call assert_equal('{ 1aa ^^2bb }', getline('.'))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
146
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
147 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
148 setl tw=20 fo=an12wcq comments=s1:/*,mb:*,ex:*/
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
149 call append('$', [
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
150 \ '/* abc def ghi jkl ',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
151 \ ' * mno pqr stu',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
152 \ ' */'])
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
153 exe "normal /mno pqr/\n"
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
154 normal A vwx yz
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
155 let lnum = line('.')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
156 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
157 \ ' * mno pqr stu ',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
158 \ ' * vwx yz',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
159 \ ' */'], getline(lnum - 1, lnum + 1))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
160
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
161 normal ggdG
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
162 setl tw=12 fo=tqnc comments=:#
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
163 call setline('.', '# 1 xxxxx')
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
164 normal A foobar
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
165 call assert_equal([
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
166 \ '# 1 xxxxx',
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
167 \ '# foobar'], getline(1, 2))
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
168
15440
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
169 " Test the 'p' flag for 'formatoptions'
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
170 " First test without the flag: that it will break "Mr. Feynman" at the space
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
171 normal ggdG
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
172 setl tw=28 fo=tcq
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
173 call setline('.', 'Surely you''re joking, Mr. Feynman!')
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
174 normal gqq
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
175 call assert_equal([
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
176 \ 'Surely you''re joking, Mr.',
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
177 \ 'Feynman!'], getline(1, 2))
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
178 " Now test with the flag: that it will push the name with the title onto the
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
179 " next line
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
180 normal ggdG
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
181 setl fo+=p
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
182 call setline('.', 'Surely you''re joking, Mr. Feynman!')
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
183 normal gqq
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
184 call assert_equal([
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
185 \ 'Surely you''re joking,',
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
186 \ 'Mr. Feynman!'], getline(1, 2))
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
187 " Ensure that it will still break if two spaces are entered
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
188 normal ggdG
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
189 call setline('.', 'Surely you''re joking, Mr. Feynman!')
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
190 normal gqq
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
191 call assert_equal([
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
192 \ 'Surely you''re joking, Mr.',
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
193 \ 'Feynman!'], getline(1, 2))
5ecac7734184 patch 8.1.0728: cannot avoid breaking after a single space.
Bram Moolenaar <Bram@vim.org>
parents: 15326
diff changeset
194
12851
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
195 setl ai& tw& fo& si& comments&
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
196 enew!
90aaa974594e patch 8.0.1302: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
197 endfunc
13146
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
198
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
199 " Tests for :right, :center and :left on text with embedded TAB.
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
200 func Test_format_align()
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
201 enew!
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
202 set tw=65
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
203
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
204 " :left alignment
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
205 call append(0, [
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
206 \ " test for :left",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
207 \ " a a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
208 \ " fa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
209 \ " dfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
210 \ " sdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
211 \ " asdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
212 \ " xasdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
213 \ "asxxdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
214 \ ])
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
215 %left
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
216 call assert_equal([
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
217 \ "test for :left",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
218 \ "a a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
219 \ "fa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
220 \ "dfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
221 \ "sdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
222 \ "asdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
223 \ "xasdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
224 \ "asxxdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
225 \ ""
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
226 \ ], getline(1, '$'))
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
227 enew!
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
228
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
229 " :center alignment
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
230 call append(0, [
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
231 \ " test for :center",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
232 \ " a a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
233 \ " fa afd asdf",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
234 \ " dfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
235 \ " sdfa afd asdf",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
236 \ " asdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
237 \ " xasdfa asdfasdfasdfasdfasdf",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
238 \ "asxxdfa a"
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
239 \ ])
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
240 %center
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
241 call assert_equal([
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
242 \ " test for :center",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
243 \ " a a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
244 \ " fa afd asdf",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
245 \ " dfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
246 \ " sdfa afd asdf",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
247 \ " asdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
248 \ " xasdfa asdfasdfasdfasdfasdf",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
249 \ " asxxdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
250 \ ""
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
251 \ ], getline(1, '$'))
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
252 enew!
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
253
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
254 " :right alignment
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
255 call append(0, [
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
256 \ " test for :right",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
257 \ " a a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
258 \ " fa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
259 \ " dfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
260 \ " sdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
261 \ " asdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
262 \ " xasdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
263 \ " asxxdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
264 \ " asxa;ofa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
265 \ " asdfaqwer a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
266 \ " a ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
267 \ " fa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
268 \ " dfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
269 \ " sdfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
270 \ " asdfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
271 \ " xasdfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
272 \ " asxxdfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
273 \ " asxa;ofa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
274 \ " asdfaqwer ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
275 \ " a axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
276 \ " fa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
277 \ " dfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
278 \ " sdfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
279 \ " asdfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
280 \ " xasdfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
281 \ " asxxdfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
282 \ " asxa;ofa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
283 \ " asdfaqwer axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
284 \ " a axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
285 \ " fa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
286 \ " dfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
287 \ " sdfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
288 \ " asdfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
289 \ " xasdfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
290 \ " asxxdfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
291 \ " asxa;ofa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
292 \ " asdfaqwer axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
293 \ " a axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
294 \ " fa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
295 \ " dfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
296 \ " sdfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
297 \ " asdfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
298 \ " xasdfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
299 \ " asxxdfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
300 \ " asxa;ofa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
301 \ " asdfaqwer axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
302 \ " a axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
303 \ " fa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
304 \ " dfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
305 \ " sdfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
306 \ " asdfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
307 \ " xasdfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
308 \ " asxxdfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
309 \ " asxa;ofa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
310 \ " asdfaqwer axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
311 \ " a axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
312 \ " fa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
313 \ " dfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
314 \ " sdfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
315 \ " asdfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
316 \ " xasdfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
317 \ " asxxdfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
318 \ " asxa;ofa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
319 \ " asdfaqwer axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
320 \ " a axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
321 \ " fa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
322 \ " dfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
323 \ " sdfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
324 \ " asdfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
325 \ " xasdfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
326 \ " asxxdfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
327 \ " asxa;ofa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
328 \ " asdfaqwer axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
329 \ " a axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
330 \ " fa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
331 \ " dfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
332 \ " sdfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
333 \ " asdfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
334 \ " xasdfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
335 \ " asxxdfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
336 \ " asxa;ofa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
337 \ " asdfaqwer axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
338 \ ])
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
339 %right
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
340 call assert_equal([
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
341 \ "\t\t\t\t test for :right",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
342 \ "\t\t\t\t a a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
343 \ "\t\t\t\t fa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
344 \ "\t\t\t\t dfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
345 \ "\t\t\t\t sdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
346 \ "\t\t\t\t asdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
347 \ "\t\t\t\t xasdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
348 \ "\t\t\t\t asxxdfa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
349 \ "\t\t\t\t asxa;ofa a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
350 \ "\t\t\t\t asdfaqwer a",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
351 \ "\t\t\t\t a ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
352 \ "\t\t\t\t fa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
353 \ "\t\t\t\t dfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
354 \ "\t\t\t\t sdfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
355 \ "\t\t\t\t asdfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
356 \ "\t\t\t\t xasdfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
357 \ "\t\t\t\t asxxdfa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
358 \ "\t\t\t\t asxa;ofa ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
359 \ "\t\t\t\t asdfaqwer ax",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
360 \ "\t\t\t\t a axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
361 \ "\t\t\t\t fa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
362 \ "\t\t\t\t dfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
363 \ "\t\t\t\t sdfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
364 \ "\t\t\t\t asdfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
365 \ "\t\t\t\t xasdfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
366 \ "\t\t\t\t asxxdfa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
367 \ "\t\t\t\t asxa;ofa axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
368 \ "\t\t\t\t asdfaqwer axx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
369 \ "\t\t\t\t a axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
370 \ "\t\t\t\t fa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
371 \ "\t\t\t\t dfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
372 \ "\t\t\t\t sdfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
373 \ "\t\t\t\t asdfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
374 \ "\t\t\t\t xasdfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
375 \ "\t\t\t\t asxxdfa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
376 \ "\t\t\t\t asxa;ofa axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
377 \ "\t\t\t\t asdfaqwer axxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
378 \ "\t\t\t\t a axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
379 \ "\t\t\t\t fa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
380 \ "\t\t\t\t dfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
381 \ "\t\t\t\t sdfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
382 \ "\t\t\t\t asdfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
383 \ "\t\t\t\t xasdfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
384 \ "\t\t\t\t asxxdfa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
385 \ "\t\t\t\t asxa;ofa axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
386 \ "\t\t\t\t asdfaqwer axxxo",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
387 \ "\t\t\t\t a axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
388 \ "\t\t\t\t fa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
389 \ "\t\t\t\t dfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
390 \ "\t\t\t\t sdfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
391 \ "\t\t\t\t asdfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
392 \ "\t\t\t\t xasdfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
393 \ "\t\t\t\t asxxdfa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
394 \ "\t\t\t\t asxa;ofa axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
395 \ "\t\t\t\t asdfaqwer axxxoi",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
396 \ "\t\t\t\t a axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
397 \ "\t\t\t\t fa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
398 \ "\t\t\t\t dfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
399 \ "\t\t\t\t sdfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
400 \ "\t\t\t\t asdfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
401 \ "\t\t\t\t xasdfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
402 \ "\t\t\t\t asxxdfa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
403 \ "\t\t\t\t asxa;ofa axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
404 \ "\t\t\t\t asdfaqwer axxxoik",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
405 \ "\t\t\t\t a axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
406 \ "\t\t\t\t fa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
407 \ "\t\t\t\t dfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
408 \ "\t\t\t\t sdfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
409 \ "\t\t\t\t asdfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
410 \ "\t\t\t\t xasdfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
411 \ "\t\t\t\t asxxdfa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
412 \ "\t\t\t\t asxa;ofa axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
413 \ "\t\t\t\t asdfaqwer axxxoike",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
414 \ "\t\t\t\t a axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
415 \ "\t\t\t\t fa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
416 \ "\t\t\t\t dfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
417 \ "\t\t\t\t sdfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
418 \ "\t\t\t\t asdfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
419 \ "\t\t\t\t xasdfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
420 \ "\t\t\t\t asxxdfa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
421 \ "\t\t\t\t asxa;ofa axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
422 \ "\t\t\t\t asdfaqwer axxxoikey",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
423 \ ""
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
424 \ ], getline(1, '$'))
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
425 enew!
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
426
19231
b8fd7364befd patch 8.2.0174: various commands not completely tested
Bram Moolenaar <Bram@vim.org>
parents: 18910
diff changeset
427 " align text with 'wrapmargin'
b8fd7364befd patch 8.2.0174: various commands not completely tested
Bram Moolenaar <Bram@vim.org>
parents: 18910
diff changeset
428 call setline(1, ['Vim'])
b8fd7364befd patch 8.2.0174: various commands not completely tested
Bram Moolenaar <Bram@vim.org>
parents: 18910
diff changeset
429 set textwidth=0
b8fd7364befd patch 8.2.0174: various commands not completely tested
Bram Moolenaar <Bram@vim.org>
parents: 18910
diff changeset
430 set wrapmargin=60
b8fd7364befd patch 8.2.0174: various commands not completely tested
Bram Moolenaar <Bram@vim.org>
parents: 18910
diff changeset
431 right
b8fd7364befd patch 8.2.0174: various commands not completely tested
Bram Moolenaar <Bram@vim.org>
parents: 18910
diff changeset
432 call assert_equal("\t\t Vim", getline(1))
b8fd7364befd patch 8.2.0174: various commands not completely tested
Bram Moolenaar <Bram@vim.org>
parents: 18910
diff changeset
433 set wrapmargin&
b8fd7364befd patch 8.2.0174: various commands not completely tested
Bram Moolenaar <Bram@vim.org>
parents: 18910
diff changeset
434
13146
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
435 set tw&
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
436 endfunc
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
437
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
438 " Test formatting a paragraph.
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
439 func Test_format_para()
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
440 enew!
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
441 set fo+=tcroql tw=72
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
442
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
443 call append(0, [
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
444 \ "xxxxx xx xxxxxx ",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
445 \ "xxxxxxx xxxxxxxxx xxx xxxx xxxxx xxxxx xxx xx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
446 \ "xxxxxxxxxxxxxxxxxx xxxxx xxxx, xxxx xxxx xxxx xxxx xxx xx xx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
447 \ "xx xxxxxxx. xxxx xxxx.",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
448 \ "",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
449 \ "> xx xx, xxxx xxxx xxx xxxx xxx xxxxx xxx xxx xxxxxxx xxx xxxxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
450 \ "> xxxxxx xxxxxxx: xxxx xxxxxxx, xx xxxxxx xxxx xxxxxxxxxx"
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
451 \ ])
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
452 exe "normal /xxxxxxxx$\<CR>"
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
453 normal 0gq6kk
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
454 call assert_equal([
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
455 \ "xxxxx xx xxxxxx xxxxxxx xxxxxxxxx xxx xxxx xxxxx xxxxx xxx xx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
456 \ "xxxxxxxxxxxxxxxxxx xxxxx xxxx, xxxx xxxx xxxx xxxx xxx xx xx xx xxxxxxx.",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
457 \ "xxxx xxxx.",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
458 \ "",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
459 \ "> xx xx, xxxx xxxx xxx xxxx xxx xxxxx xxx xxx xxxxxxx xxx xxxxx xxxxxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
460 \ "> xxxxxxx: xxxx xxxxxxx, xx xxxxxx xxxx xxxxxxxxxx",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
461 \ ""
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
462 \ ], getline(1, '$'))
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
463
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
464 set fo& tw&
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
465 enew!
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
466 endfunc
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
467
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
468 " Test undo after ":%s" and formatting.
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
469 func Test_format_undo()
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
470 enew!
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
471 map gg :.,.+2s/^/x/<CR>kk:set tw=3<CR>gqq
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
472
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
473 call append(0, [
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
474 \ "aa aa aa aa",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
475 \ "bb bb bb bb",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
476 \ "cc cc cc cc"
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
477 \ ])
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
478 " undo/redo here to make the next undo only work on the following changes
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
479 exe "normal i\<C-G>u"
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
480 call cursor(1,1)
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
481 normal ggu
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
482 call assert_equal([
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
483 \ "aa aa aa aa",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
484 \ "bb bb bb bb",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
485 \ "cc cc cc cc",
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
486 \ ""
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
487 \ ], getline(1, '$'))
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
488
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
489 unmap gg
15326
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
490 set tw&
13146
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
491 enew!
d9a94be389b5 patch 8.0.1447: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12851
diff changeset
492 endfunc
15326
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
493
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
494 func Test_format_list_auto()
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
495 new
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
496 call setline(1, ['1. abc', '2. def', '3. ghi'])
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
497 set fo=tan ai bs=2
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
498 call feedkeys("3G0lli\<BS>\<BS>x\<Esc>", 'tx')
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
499 call assert_equal('2. defx ghi', getline(2))
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
500 bwipe!
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
501 set fo& ai& bs&
fe428bee74b3 patch 8.1.0671: cursor in the wrong column after auto-formatting
Bram Moolenaar <Bram@vim.org>
parents: 13146
diff changeset
502 endfunc
18408
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
503
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
504 func Test_crash_github_issue_5095()
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
505 CheckFeature autocmd
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
506
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
507 " This used to segfault, see https://github.com/vim/vim/issues/5095
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
508 augroup testing
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
509 au BufNew x center
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
510 augroup END
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
511
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
512 next! x
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
513
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
514 bw
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
515 augroup testing
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
516 au!
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
517 augroup END
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
518 augroup! testing
50c0a9fb07ae patch 8.1.2198: crash when using :center in autocommand
Bram Moolenaar <Bram@vim.org>
parents: 15440
diff changeset
519 endfunc
18906
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
520
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
521 " Test for formatting multi-byte text with 'fo=t'
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
522 func Test_tw_2_fo_t()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
523 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
524 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
525 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
526 XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
527 abc XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
528 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
529 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
530 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
531 call cursor(2, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
532
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
533 set tw=2 fo=t
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
534 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
535 XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
536 abc XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
537 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
538 exe "normal gqgqjgqgq"
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
539 exe "normal o\n" . join(t, "\n")
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
540
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
541 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
542 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
543 XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
544 abc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
545 XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
546
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
547 XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
548 abc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
549 XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
550 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
551 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
552 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
553
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
554 set tw& fo&
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
555 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
556 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
557
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
558 " Test for formatting multi-byte text with 'fo=tm' and 'tw=1'
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
559 func Test_tw_1_fo_tm()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
560 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
561 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
562 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
563
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
564 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
565 X a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
566 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
567 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
568 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
569 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
570 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
571 call cursor(2, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
572
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
573 set tw=1 fo=tm
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
574 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
575
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
576 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
577 X a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
578 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
579 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
580 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
581 exe "normal gqgqjgqgqjgqgqjgqgqjgqgq"
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
582 exe "normal o\n" . join(t, "\n")
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
583
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
584 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
585 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
586
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
587
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
588 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
589
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
590 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
591
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
592
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
593
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
594
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
595
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
596
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
597
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
598 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
599
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
600 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
601
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
602
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
603
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
604
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
605 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
606 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
607 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
608
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
609 set tw& fo&
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
610 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
611 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
612
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
613 " Test for formatting multi-byte text with 'fo=tm' and 'tw=2'
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
614 func Test_tw_2_fo_tm()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
615 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
616 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
617 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
618
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
619 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
620 X a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
621 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
622 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
623 aX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
624 abX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
625 abcX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
626 abX c
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
627 abXY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
628 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
629 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
630 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
631 call cursor(2, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
632
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
633 set tw=2 fo=tm
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
634 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
635
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
636 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
637 X a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
638 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
639 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
640 aX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
641 abX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
642 abcX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
643 abX c
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
644 abXY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
645 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
646 exe "normal gqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgq"
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
647 exe "normal o\n" . join(t, "\n")
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
648
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
649 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
650 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
651
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
652
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
653 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
654
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
655 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
656
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
657
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
658
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
659
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
660 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
661
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
662 ab
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
663
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
664 abc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
665
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
666 ab
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
667
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
668 c
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
669 ab
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
670
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
671
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
672
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
673
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
674
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
675 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
676
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
677 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
678
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
679
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
680
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
681
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
682 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
683
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
684 ab
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
685
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
686 abc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
687
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
688 ab
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
689
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
690 c
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
691 ab
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
692
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
693
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
694 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
695 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
696 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
697
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
698 set tw& fo&
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
699 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
700 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
701
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
702 " Test for formatting multi-byte text with 'fo=tm', 'tw=2' and 'autoindent'.
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
703 func Test_tw_2_fo_tm_ai()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
704 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
705 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
706 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
707
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
708 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
709 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
710 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
711 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
712 call cursor(2, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
713
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
714 set ai tw=2 fo=tm
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
715 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
716
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
717 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
718 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
719 exe "normal gqgqjgqgq"
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
720 exe "normal o\n" . join(t, "\n")
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
721
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
722 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
723 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
724
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
725
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
726 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
727
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
728
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
729
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
730 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
731 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
732 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
733 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
734
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
735 set tw& fo& ai&
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
736 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
737 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
738
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
739 " Test for formatting multi-byte text with 'fo=tm', 'tw=2' and 'noai'.
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
740 func Test_tw_2_fo_tm_noai()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
741 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
742 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
743 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
744
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
745 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
746 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
747 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
748 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
749 call cursor(2, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
750
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
751 set noai tw=2 fo=tm
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
752 exe "normal gqgqjgqgqo\n X\n Xa"
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
753
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
754 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
755 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
756
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
757
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
758 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
759
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
760
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
761
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
762 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
763 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
764 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
765 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
766
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
767 set tw& fo& ai&
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
768 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
769 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
770
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
771 func Test_tw_2_fo_cqm_com()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
772 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
773 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
774 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
775
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
776 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
777 XaY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
778 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
779 XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
780 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
781 X YZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
782 XX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
783 XXa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
784 XXY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
785 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
786 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
787 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
788 call cursor(2, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
789
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
790 set tw=2 fo=cqm comments=n:X
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
791 exe "normal gqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgq"
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
792 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
793
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
794 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
795 XaY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
796 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
797 XYZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
798 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
799 X YZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
800 XX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
801 XXa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
802 XXY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
803 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
804 exe "normal o\n" . join(t, "\n")
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
805
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
806 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
807 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
808
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
809 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
810 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
811 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
812 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
813 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
814 XZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
815 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
816 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
817 X Z
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
818 XX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
819 XXa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
820 XXY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
821
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
822
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
823 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
824 Xa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
825 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
826 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
827 XY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
828 XZ
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
829 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
830 X Y
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
831 X Z
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
832 XX
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
833 XXa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
834 XXY
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
835 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
836 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
837 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
838
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
839 set tw& fo& comments&
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
840 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
841 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
842
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
843 func Test_tw_2_fo_tm_replace()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
844 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
845 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
846 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
847
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
848 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
849 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
850 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
851 call cursor(2, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
852
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
853 set tw=2 fo=tm
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
854 exe "normal RXa"
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
855
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
856 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
857 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
858
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
859 a
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
860 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
861 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
862 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
863
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
864 set tw& fo&
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
865 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
866 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
867
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
868 " Test for 'matchpairs' with multibyte chars
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
869 func Test_mps()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
870 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
871 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
872 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
873 ‘ two three ’ four
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
874 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
875 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
876 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
877 call cursor(2, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
878
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
879 exe "set mps+=\u2018:\u2019"
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
880 normal d%
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
881
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
882 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
883 {
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
884 four
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
885 }
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
886 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
887 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
888
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
889 set mps&
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
890 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
891 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
892
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
893 " Test for ra on multi-byte characters
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
894 func Test_ra_multibyte()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
895 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
896 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
897 ra test
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
898 abba
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
899 aab
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
900 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
901 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
902 call cursor(1, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
903
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
904 normal jVjra
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
905
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
906 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
907 ra test
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
908 aaaa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
909 aaa
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
910 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
911 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
912
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
913 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
914 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
915
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
916 " Test for 'whichwrap' with multi-byte character
18910
e8fe65da4198 patch 8.2.0016: test name used twice, option not restored properly
Bram Moolenaar <Bram@vim.org>
parents: 18906
diff changeset
917 func Test_whichwrap_multi_byte()
18906
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
918 new
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
919 let t =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
920 á
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
921 x
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
922 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
923 call setline(1, t)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
924 call cursor(2, 1)
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
925
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
926 set whichwrap+=h
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
927 normal dh
18910
e8fe65da4198 patch 8.2.0016: test name used twice, option not restored properly
Bram Moolenaar <Bram@vim.org>
parents: 18906
diff changeset
928 set whichwrap&
18906
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
929
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
930 let expected =<< trim END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
931 áx
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
932 END
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
933 call assert_equal(expected, getline(1, '$'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
934
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
935 bwipe!
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
936 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
937
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
938 func Test_substitute()
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
939 call assert_equal('a1a2a3a', substitute('123', '\zs', 'a', 'g'))
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
940 endfunc
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
941
bb87c5c1e29b patch 8.2.0014: test69 and test95 are old style
Bram Moolenaar <Bram@vim.org>
parents: 18408
diff changeset
942 " vim: shiftwidth=2 sts=2 expandtab