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
|
-- Operator marks for a forced blockwise motion.
local t = require('test.testutil')
local n = require('test.functional.testnvim')()
local describe, it, before_each = t.describe, t.it, t.before_each
local clear = n.clear
local command = n.command
local feed = n.feed
local fn = n.fn
local api = n.api
local eq = t.eq
describe('operator', function()
before_each(clear)
it('forced-blockwise motion (o_CTRL-V): g@ and y get the block #42309', function()
local marks = [=[[getpos("'[")[1:3], getpos("']")[1:3]]]=]
n.exec(([[
func! Op(type) abort
let g:op = [a:type] + %s
endfunc
set operatorfunc=Op
]]):format(marks))
--- Asserts that g@ and y see the same block: '[ and '] marks, and the yanked text.
local function assert_block(lines, keys, expected_marks, expected_text)
api.nvim_buf_set_lines(0, 0, -1, true, lines)
feed(keys)
eq({ 'block', unpack(expected_marks) }, api.nvim_get_var('op'), keys)
feed((keys:gsub('g@', 'y')))
eq(expected_marks, n.eval(marks), keys)
eq(expected_text, fn.getreg('"', 1, 1), keys)
end
assert_block({ 'seed', 'ab', 'cd' }, '2G0g@<C-v>j', { { 2, 1, 0 }, { 3, 1, 0 } }, { 'a', 'c' })
assert_block({ 'seed', 'ab', 'cd' }, '2G0g@<C-v>e', { { 2, 1, 0 }, { 2, 2, 0 } }, { 'ab' })
-- Exclusive motion: the block still includes the end.
assert_block({ 'abcd' }, '02|g@<C-v>l', { { 1, 2, 0 }, { 1, 3, 0 } }, { 'bc' })
command('set selection=exclusive')
assert_block({ 'abcd' }, '02|g@<C-v>l', { { 1, 2, 0 }, { 1, 2, 0 } }, { 'b' })
command('set selection&')
-- Short last line: '] keeps the right edge (past EOL).
command('set virtualedit=block')
assert_block(
{ 'abcdef', 'abcdef', 'ab' },
'1G4|g@<C-v>2j',
{ { 1, 2, 0 }, { 3, 3, 1 } },
{ 'bcd', 'bcd', 'b ' }
)
-- "d" deletes the block, not the lines.
api.nvim_buf_set_lines(0, 0, -1, true, { 'ab', 'cd' })
feed('gg0d<C-v>j')
eq({ 'b', 'd' }, api.nvim_buf_get_lines(0, 0, -1, true))
end)
end)
|
