1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
|
" Tests for 'virtualedit'.
func Test_yank_move_change()
new
call setline(1, [
\ "func foo() error {",
\ "\tif n, err := bar();",
\ "\terr != nil {",
\ "\t\treturn err",
\ "\t}",
\ "\tn = n * n",
\ ])
set virtualedit=all
set ts=4
function! MoveSelectionDown(count) abort
normal! m`
silent! exe "'<,'>move'>+".a:count
norm! ``
endfunction
xmap ]e :<C-U>call MoveSelectionDown(v:count1)<CR>
2
normal 2gg
normal J
normal jVj
normal ]e
normal ce
bwipe!
set virtualedit=
set ts=8
endfunc
func Test_paste_end_of_line()
new
set virtualedit=all
call setline(1, ['456', '123'])
normal! gg0"ay$
exe "normal! 2G$lllA\<C-O>:normal! \"agP\r"
call assert_equal('123456', getline(2))
bwipe!
set virtualedit=
endfunc
func Test_replace_end_of_line()
new
set virtualedit=all
call setline(1, range(20))
exe "normal! gg2jv10lr-"
call assert_equal(["1", "-----------", "3"], getline(2,4))
call setline(1, range(20))
exe "normal! gg2jv10lr\<c-k>hh"
call assert_equal(["1", "───────────", "3"], getline(2,4))
bwipe!
set virtualedit=
endfunc
func Test_edit_CTRL_G()
new
set virtualedit=insert
call setline(1, ['123', '1', '12'])
exe "normal! ggA\<c-g>jx\<c-g>jx"
call assert_equal(['123', '1 x', '12 x'], getline(1,'$'))
set virtualedit=all
%d_
call setline(1, ['1', '12'])
exe "normal! ggllix\<c-g>jx"
call assert_equal(['1 x', '12x'], getline(1,'$'))
bwipe!
set virtualedit=
endfunc
func Test_edit_change()
new
set virtualedit=all
call setline(1, "\t⒌")
normal Cx
call assert_equal('x', getline(1))
bwipe!
endfunc
" Insert "keyword keyw", ESC, C CTRL-N, shows "keyword ykeyword".
" Repeating CTRL-N fixes it. (Mary Ellen Foster)
func Test_ve_completion()
new
set completeopt&vim
set virtualedit=all
exe "normal ikeyword keyw\<Esc>C\<C-N>"
call assert_equal('keyword keyword', getline(1))
bwipe!
set virtualedit=
endfunc
" Using "C" then then <CR> moves the last remaining character to the next
" line. (Mary Ellen Foster)
func Test_ve_del_to_eol()
new
set virtualedit=all
call append(0, 'all your base are belong to us')
call search('are', 'w')
exe "normal C\<CR>are belong to vim"
call assert_equal(['all your base ', 'are belong to vim'], getline(1, 2))
bwipe!
set virtualedit=
endfunc
" When past the end of a line that ends in a single character "b" skips
" that word.
func Test_ve_b_past_eol()
new
set virtualedit=all
call append(0, '1 2 3 4 5 6')
normal gg^$15lbC7
call assert_equal('1 2 3 4 5 7', getline(1))
bwipe!
set virtualedit=
endfunc
" Make sure 'i', 'C', 'a', 'A' and 'D' works
func Test_ve_ins_del()
new
set virtualedit=all
call append(0, ["'i'", "'C'", "'a'", "'A'", "'D'"])
call cursor(1, 1)
normal $4lix
call assert_equal("'i' x", getline(1))
call cursor(2, 1)
normal $4lCx
call assert_equal("'C' x", getline(2))
call cursor(3, 1)
normal $4lax
call assert_equal("'a' x", getline(3))
call cursor(4, 1)
normal $4lAx
call assert_equal("'A'x", getline(4))
call cursor(5, 1)
normal $4lDix
call assert_equal("'D' x", getline(5))
bwipe!
set virtualedit=
endfunc
" Test for yank bug reported by Mark Waggoner.
func Test_yank_block()
new
set virtualedit=block
call append(0, repeat(['this is a test'], 3))
exe "normal gg^2w\<C-V>3jy"
call assert_equal("a\na\na\n ", @")
bwipe!
set virtualedit=
endfunc
" Test "r" beyond the end of the line
func Test_replace_after_eol()
new
set virtualedit=all
call append(0, '"r"')
normal gg$5lrxa
call assert_equal('"r" x', getline(1))
bwipe!
set virtualedit=
endfunc
" Test "r" on a tab
" Note that for this test, 'ts' must be 8 (the default).
func Test_replace_on_tab()
new
set virtualedit=all
call append(0, "'r'\t")
normal gg^5lrxAy
call assert_equal("'r' x y", getline(1))
bwipe!
set virtualedit=
endfunc
" Test to make sure 'x' can delete control characters
func Test_ve_del_ctrl_chars()
new
set virtualedit=all
call append(0, "a\<C-V>b\<CR>sd")
set display=uhex
normal gg^xxxxxxi[text]
set display=
call assert_equal('[text]', getline(1))
bwipe!
set virtualedit=
endfunc
" Test for ^Y/^E due to bad w_virtcol value, reported by
" Roy <royl@netropolis.net>.
func Test_ins_copy_char()
new
set virtualedit=all
call append(0, 'abcv8efi.him2kl')
exe "normal gg^O\<Esc>3li\<C-E>\<Esc>4li\<C-E>\<Esc>4li\<C-E> <--"
exe "normal j^o\<Esc>4li\<C-Y>\<Esc>4li\<C-Y>\<Esc>4li\<C-Y> <--"
call assert_equal(' v i m <--', getline(1))
call assert_equal(' 8 . 2 <--', getline(3))
bwipe!
set virtualedit=
endfunc
" Test for yanking and pasting using the small delete register
func Test_yank_paste_small_del_reg()
new
set virtualedit=all
call append(0, "foo, bar")
normal ggdewve"-p
call assert_equal(', foo', getline(1))
bwipe!
set virtualedit=
endfunc
" vim: shiftwidth=2 sts=2 expandtab
|
