2017-03-13 05:16:40 -07:00
|
|
|
|
|
|
|
" Test that a deleted mark is restored after delete-undo-redo-undo.
|
|
|
|
function! Test_Restore_DelMark()
|
|
|
|
enew!
|
|
|
|
call append(0, [" textline A", " textline B", " textline C"])
|
|
|
|
normal! 2gg
|
|
|
|
set nocp viminfo+=nviminfo
|
|
|
|
exe "normal! i\<C-G>u\<Esc>"
|
|
|
|
exe "normal! maddu\<C-R>u"
|
|
|
|
let pos = getpos("'a")
|
|
|
|
call assert_equal(2, pos[1])
|
|
|
|
call assert_equal(1, pos[2])
|
|
|
|
enew!
|
|
|
|
endfunction
|
|
|
|
|
|
|
|
" Test that CTRL-A and CTRL-X updates last changed mark '[, '].
|
|
|
|
function! Test_Incr_Marks()
|
|
|
|
enew!
|
|
|
|
call append(0, ["123 123 123", "123 123 123", "123 123 123"])
|
|
|
|
normal! gg
|
|
|
|
execute "normal! \<C-A>`[v`]rAjwvjw\<C-X>`[v`]rX"
|
|
|
|
call assert_equal("AAA 123 123", getline(1))
|
|
|
|
call assert_equal("123 XXXXXXX", getline(2))
|
|
|
|
call assert_equal("XXX 123 123", getline(3))
|
|
|
|
enew!
|
|
|
|
endfunction
|
2018-06-06 14:39:38 -07:00
|
|
|
|
|
|
|
func Test_setpos()
|
2020-01-15 20:20:21 -07:00
|
|
|
new Xone
|
2018-06-06 14:39:38 -07:00
|
|
|
let onebuf = bufnr('%')
|
|
|
|
let onewin = win_getid()
|
|
|
|
call setline(1, ['aaa', 'bbb', 'ccc'])
|
2020-01-15 20:20:21 -07:00
|
|
|
new Xtwo
|
2018-06-06 14:39:38 -07:00
|
|
|
let twobuf = bufnr('%')
|
|
|
|
let twowin = win_getid()
|
|
|
|
call setline(1, ['aaa', 'bbb', 'ccc'])
|
|
|
|
|
|
|
|
" for the cursor the buffer number is ignored
|
|
|
|
call setpos(".", [0, 2, 1, 0])
|
|
|
|
call assert_equal([0, 2, 1, 0], getpos("."))
|
|
|
|
call setpos(".", [onebuf, 3, 3, 0])
|
|
|
|
call assert_equal([0, 3, 3, 0], getpos("."))
|
|
|
|
|
|
|
|
call setpos("''", [0, 1, 3, 0])
|
|
|
|
call assert_equal([0, 1, 3, 0], getpos("''"))
|
|
|
|
call setpos("''", [onebuf, 2, 2, 0])
|
|
|
|
call assert_equal([0, 2, 2, 0], getpos("''"))
|
|
|
|
|
|
|
|
" buffer-local marks
|
|
|
|
for mark in ["'a", "'\"", "'[", "']", "'<", "'>"]
|
|
|
|
call win_gotoid(twowin)
|
|
|
|
call setpos(mark, [0, 2, 1, 0])
|
|
|
|
call assert_equal([0, 2, 1, 0], getpos(mark), "for mark " . mark)
|
|
|
|
call setpos(mark, [onebuf, 1, 3, 0])
|
|
|
|
call win_gotoid(onewin)
|
|
|
|
call assert_equal([0, 1, 3, 0], getpos(mark), "for mark " . mark)
|
|
|
|
endfor
|
|
|
|
|
|
|
|
" global marks
|
|
|
|
call win_gotoid(twowin)
|
|
|
|
call setpos("'N", [0, 2, 1, 0])
|
|
|
|
call assert_equal([twobuf, 2, 1, 0], getpos("'N"))
|
|
|
|
call setpos("'N", [onebuf, 1, 3, 0])
|
|
|
|
call assert_equal([onebuf, 1, 3, 0], getpos("'N"))
|
|
|
|
|
2020-01-15 20:20:21 -07:00
|
|
|
" try invalid column and check virtcol()
|
2018-06-06 14:39:38 -07:00
|
|
|
call win_gotoid(onewin)
|
2020-01-15 20:20:21 -07:00
|
|
|
call setpos("'a", [0, 1, 2, 0])
|
|
|
|
call assert_equal([0, 1, 2, 0], getpos("'a"))
|
|
|
|
call setpos("'a", [0, 1, -5, 0])
|
|
|
|
call assert_equal([0, 1, 2, 0], getpos("'a"))
|
|
|
|
call setpos("'a", [0, 1, 0, 0])
|
|
|
|
call assert_equal([0, 1, 1, 0], getpos("'a"))
|
|
|
|
call setpos("'a", [0, 1, 4, 0])
|
|
|
|
call assert_equal([0, 1, 4, 0], getpos("'a"))
|
|
|
|
call assert_equal(4, virtcol("'a"))
|
|
|
|
call setpos("'a", [0, 1, 5, 0])
|
|
|
|
call assert_equal([0, 1, 5, 0], getpos("'a"))
|
|
|
|
call assert_equal(4, virtcol("'a"))
|
|
|
|
call setpos("'a", [0, 1, 21341234, 0])
|
|
|
|
call assert_equal([0, 1, 21341234, 0], getpos("'a"))
|
|
|
|
call assert_equal(4, virtcol("'a"))
|
|
|
|
|
2018-06-06 14:39:38 -07:00
|
|
|
bwipe!
|
|
|
|
call win_gotoid(twowin)
|
|
|
|
bwipe!
|
|
|
|
endfunc
|
2018-09-13 03:57:38 -07:00
|
|
|
|
|
|
|
func Test_marks_cmd()
|
|
|
|
new Xone
|
|
|
|
call setline(1, ['aaa', 'bbb'])
|
|
|
|
norm! maG$mB
|
|
|
|
w!
|
|
|
|
new Xtwo
|
|
|
|
call setline(1, ['ccc', 'ddd'])
|
|
|
|
norm! $mcGmD
|
2020-07-26 02:28:31 -07:00
|
|
|
exe "norm! GVgg\<Esc>G"
|
2018-09-13 03:57:38 -07:00
|
|
|
w!
|
|
|
|
|
|
|
|
b Xone
|
2018-09-13 17:07:19 -07:00
|
|
|
let a = split(execute('marks'), "\n")
|
2018-09-13 03:57:38 -07:00
|
|
|
call assert_equal(9, len(a))
|
2020-07-26 02:28:31 -07:00
|
|
|
call assert_equal(['mark line col file/text',
|
|
|
|
\ " ' 2 0 bbb",
|
|
|
|
\ ' a 1 0 aaa',
|
|
|
|
\ ' B 2 2 bbb',
|
|
|
|
\ ' D 2 0 Xtwo',
|
|
|
|
\ ' " 1 0 aaa',
|
|
|
|
\ ' [ 1 0 aaa',
|
|
|
|
\ ' ] 2 0 bbb',
|
|
|
|
\ ' . 2 0 bbb'], a)
|
2018-09-13 03:57:38 -07:00
|
|
|
|
|
|
|
b Xtwo
|
2018-09-13 17:07:19 -07:00
|
|
|
let a = split(execute('marks'), "\n")
|
2020-07-26 02:28:31 -07:00
|
|
|
call assert_equal(11, len(a))
|
|
|
|
call assert_equal(['mark line col file/text',
|
|
|
|
\ " ' 1 0 ccc",
|
|
|
|
\ ' c 1 2 ccc',
|
|
|
|
\ ' B 2 2 Xone',
|
|
|
|
\ ' D 2 0 ddd',
|
|
|
|
\ ' " 2 0 ddd',
|
|
|
|
\ ' [ 1 0 ccc',
|
|
|
|
\ ' ] 2 0 ddd',
|
|
|
|
\ ' . 2 0 ddd',
|
|
|
|
\ ' < 1 0 ccc',
|
|
|
|
\ ' > 2 0 ddd'], a)
|
|
|
|
norm! Gdd
|
|
|
|
w!
|
|
|
|
let a = split(execute('marks <>'), "\n")
|
|
|
|
call assert_equal(3, len(a))
|
|
|
|
call assert_equal(['mark line col file/text',
|
|
|
|
\ ' < 1 0 ccc',
|
|
|
|
\ ' > 2 0 -invalid-'], a)
|
2018-09-13 03:57:38 -07:00
|
|
|
|
|
|
|
b Xone
|
|
|
|
delmarks aB
|
2018-09-13 17:07:19 -07:00
|
|
|
let a = split(execute('marks aBcD'), "\n")
|
2018-09-13 03:57:38 -07:00
|
|
|
call assert_equal(2, len(a))
|
|
|
|
call assert_equal('mark line col file/text', a[0])
|
|
|
|
call assert_equal(' D 2 0 Xtwo', a[1])
|
|
|
|
|
|
|
|
b Xtwo
|
|
|
|
delmarks cD
|
|
|
|
call assert_fails('marks aBcD', 'E283:')
|
|
|
|
|
|
|
|
call delete('Xone')
|
|
|
|
call delete('Xtwo')
|
|
|
|
%bwipe
|
|
|
|
endfunc
|
2018-09-13 17:07:19 -07:00
|
|
|
|
|
|
|
func Test_marks_cmd_multibyte()
|
|
|
|
new Xone
|
2018-09-13 17:12:19 -07:00
|
|
|
call setline(1, [repeat('á', &columns)])
|
2018-09-13 17:07:19 -07:00
|
|
|
norm! ma
|
|
|
|
|
|
|
|
let a = split(execute('marks a'), "\n")
|
|
|
|
call assert_equal(2, len(a))
|
2018-09-13 17:12:19 -07:00
|
|
|
let expected = ' a 1 0 ' . repeat('á', &columns - 16)
|
2018-09-13 17:07:19 -07:00
|
|
|
call assert_equal(expected, a[1])
|
|
|
|
|
|
|
|
bwipe!
|
|
|
|
endfunc
|
2019-03-04 22:09:23 -07:00
|
|
|
|
|
|
|
func Test_delmarks()
|
|
|
|
new
|
|
|
|
norm mx
|
|
|
|
norm `x
|
|
|
|
delmarks x
|
|
|
|
call assert_fails('norm `x', 'E20:')
|
|
|
|
|
|
|
|
" Deleting an already deleted mark should not fail.
|
|
|
|
delmarks x
|
|
|
|
|
|
|
|
" Test deleting a range of marks.
|
|
|
|
norm ma
|
|
|
|
norm mb
|
|
|
|
norm mc
|
|
|
|
norm mz
|
|
|
|
delmarks b-z
|
|
|
|
norm `a
|
|
|
|
call assert_fails('norm `b', 'E20:')
|
|
|
|
call assert_fails('norm `c', 'E20:')
|
|
|
|
call assert_fails('norm `z', 'E20:')
|
|
|
|
call assert_fails('delmarks z-b', 'E475:')
|
|
|
|
|
|
|
|
call assert_fails('delmarks', 'E471:')
|
|
|
|
call assert_fails('delmarks /', 'E475:')
|
|
|
|
|
|
|
|
" Test delmarks!
|
|
|
|
norm mx
|
|
|
|
norm `x
|
|
|
|
delmarks!
|
|
|
|
call assert_fails('norm `x', 'E20:')
|
|
|
|
call assert_fails('delmarks! x', 'E474:')
|
|
|
|
|
|
|
|
bwipe!
|
|
|
|
endfunc
|
|
|
|
|
|
|
|
func Test_mark_error()
|
|
|
|
call assert_fails('mark', 'E471:')
|
|
|
|
call assert_fails('mark xx', 'E488:')
|
|
|
|
call assert_fails('mark _', 'E191:')
|
|
|
|
endfunc
|
2021-01-03 13:33:21 -07:00
|
|
|
|
|
|
|
" Test for the getmarklist() function
|
|
|
|
func Test_getmarklist()
|
|
|
|
new
|
|
|
|
" global marks
|
|
|
|
delmarks A-Z 0-9 \" ^.[]
|
|
|
|
call assert_equal([], getmarklist())
|
|
|
|
call setline(1, ['one', 'two', 'three'])
|
|
|
|
mark A
|
|
|
|
call cursor(3, 5)
|
|
|
|
normal mN
|
|
|
|
call assert_equal([{'file' : '', 'mark' : "'A", 'pos' : [bufnr(), 1, 1, 0]},
|
|
|
|
\ {'file' : '', 'mark' : "'N", 'pos' : [bufnr(), 3, 5, 0]}],
|
|
|
|
\ getmarklist())
|
|
|
|
" buffer local marks
|
|
|
|
delmarks!
|
|
|
|
call assert_equal([{'mark' : "''", 'pos' : [bufnr(), 1, 1, 0]},
|
|
|
|
\ {'mark' : "'\"", 'pos' : [bufnr(), 1, 1, 0]}], getmarklist(bufnr()))
|
|
|
|
call cursor(2, 2)
|
|
|
|
normal mr
|
|
|
|
call assert_equal({'mark' : "'r", 'pos' : [bufnr(), 2, 2, 0]},
|
|
|
|
\ getmarklist(bufnr())[0])
|
|
|
|
call assert_equal([], getmarklist({}))
|
|
|
|
close!
|
|
|
|
endfunc
|