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
|
" Test for textobjects
if !has('textobjects')
finish
endif
set belloff=all
function! CpoM(line, useM, expected)
new
if a:useM
set cpoptions+=M
else
set cpoptions-=M
endif
call setline(1, a:line)
call setreg('"', '')
normal! ggfrmavi)y
call assert_equal(getreg('"'), a:expected[0])
call setreg('"', '')
normal! `afbmavi)y
call assert_equal(getreg('"'), a:expected[1])
call setreg('"', '')
normal! `afgmavi)y
call assert_equal(getreg('"'), a:expected[2])
q!
endfunction
function! Test_inner_block_without_cpo_M()
call CpoM('(red \(blue) green)', 0, ['red \(blue', 'red \(blue', ''])
endfunction
function! Test_inner_block_with_cpo_M_left_backslash()
call CpoM('(red \(blue) green)', 1, ['red \(blue) green', 'blue', 'red \(blue) green'])
endfunction
function! Test_inner_block_with_cpo_M_right_backslash()
call CpoM('(red (blue\) green)', 1, ['red (blue\) green', 'blue\', 'red (blue\) green'])
endfunction
|