Bram Moolenaar | 19a1669 | 2016-09-01 22:19:47 +0200 | [diff] [blame] | 1 | |
| 2 | " Test that a deleted mark is restored after delete-undo-redo-undo. |
| 3 | function! Test_Restore_DelMark() |
| 4 | enew! |
| 5 | call append(0, [" textline A", " textline B", " textline C"]) |
| 6 | normal! 2gg |
| 7 | set nocp viminfo+=nviminfo |
| 8 | exe "normal! i\<C-G>u\<Esc>" |
| 9 | exe "normal! maddu\<C-R>u" |
| 10 | let pos = getpos("'a") |
| 11 | call assert_equal(2, pos[1]) |
| 12 | call assert_equal(1, pos[2]) |
| 13 | enew! |
| 14 | endfunction |
| 15 | |
| 16 | " Test that CTRL-A and CTRL-X updates last changed mark '[, ']. |
| 17 | function! Test_Incr_Marks() |
| 18 | enew! |
| 19 | call append(0, ["123 123 123", "123 123 123", "123 123 123"]) |
| 20 | normal! gg |
| 21 | execute "normal! \<C-A>`[v`]rAjwvjw\<C-X>`[v`]rX" |
| 22 | call assert_equal("AAA 123 123", getline(1)) |
| 23 | call assert_equal("123 XXXXXXX", getline(2)) |
| 24 | call assert_equal("XXX 123 123", getline(3)) |
| 25 | enew! |
| 26 | endfunction |
Bram Moolenaar | f13e00b | 2017-01-28 18:23:54 +0100 | [diff] [blame] | 27 | |
| 28 | func Test_setpos() |
| 29 | new one |
| 30 | let onebuf = bufnr('%') |
| 31 | let onewin = win_getid() |
| 32 | call setline(1, ['aaa', 'bbb', 'ccc']) |
| 33 | new two |
| 34 | let twobuf = bufnr('%') |
| 35 | let twowin = win_getid() |
| 36 | call setline(1, ['aaa', 'bbb', 'ccc']) |
| 37 | |
| 38 | " for the cursor the buffer number is ignored |
| 39 | call setpos(".", [0, 2, 1, 0]) |
| 40 | call assert_equal([0, 2, 1, 0], getpos(".")) |
| 41 | call setpos(".", [onebuf, 3, 3, 0]) |
| 42 | call assert_equal([0, 3, 3, 0], getpos(".")) |
| 43 | |
| 44 | call setpos("''", [0, 1, 3, 0]) |
| 45 | call assert_equal([0, 1, 3, 0], getpos("''")) |
| 46 | call setpos("''", [onebuf, 2, 2, 0]) |
| 47 | call assert_equal([0, 2, 2, 0], getpos("''")) |
| 48 | |
| 49 | " buffer-local marks |
| 50 | for mark in ["'a", "'\"", "'[", "']", "'<", "'>"] |
| 51 | call win_gotoid(twowin) |
| 52 | call setpos(mark, [0, 2, 1, 0]) |
| 53 | call assert_equal([0, 2, 1, 0], getpos(mark), "for mark " . mark) |
| 54 | call setpos(mark, [onebuf, 1, 3, 0]) |
| 55 | call win_gotoid(onewin) |
| 56 | call assert_equal([0, 1, 3, 0], getpos(mark), "for mark " . mark) |
| 57 | endfor |
| 58 | |
| 59 | " global marks |
| 60 | call win_gotoid(twowin) |
| 61 | call setpos("'N", [0, 2, 1, 0]) |
| 62 | call assert_equal([twobuf, 2, 1, 0], getpos("'N")) |
| 63 | call setpos("'N", [onebuf, 1, 3, 0]) |
| 64 | call assert_equal([onebuf, 1, 3, 0], getpos("'N")) |
| 65 | |
| 66 | call win_gotoid(onewin) |
| 67 | bwipe! |
| 68 | call win_gotoid(twowin) |
| 69 | bwipe! |
| 70 | endfunc |