Mercurial > vim
view src/testdir/test_marks.vim @ 15721:e84eb23f4670 v8.1.0868
patch 8.1.0868: crash if triggering garbage collector after a function call
commit https://github.com/vim/vim/commit/889da2f2438c8168f9a25dc776360b81109bad44
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Feb 2 14:02:30 2019 +0100
patch 8.1.0868: crash if triggering garbage collector after a function call
Problem: Crash if triggering garbage collector after a function call.
(Michael Henry)
Solution: Don't call the garbage collector right away, do it later.
(closes #3894)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sat, 02 Feb 2019 14:15:12 +0100 |
parents | 2dcaa860e3fc |
children | 6839f99d2269 |
line wrap: on
line source
" Test that a deleted mark is restored after delete-undo-redo-undo. func 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! endfunc " Test that CTRL-A and CTRL-X updates last changed mark '[, ']. func 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! endfunc func Test_setpos() new one let onebuf = bufnr('%') let onewin = win_getid() call setline(1, ['aaa', 'bbb', 'ccc']) new two 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")) call win_gotoid(onewin) bwipe! call win_gotoid(twowin) bwipe! endfunc func Test_marks_cmd() new Xone call setline(1, ['aaa', 'bbb']) norm! maG$mB w! new Xtwo call setline(1, ['ccc', 'ddd']) norm! $mcGmD w! b Xone let a = split(execute('marks'), "\n") call assert_equal(9, len(a)) call assert_equal('mark line col file/text', a[0]) call assert_equal(" ' 2 0 bbb", a[1]) call assert_equal(' a 1 0 aaa', a[2]) call assert_equal(' B 2 2 bbb', a[3]) call assert_equal(' D 2 0 Xtwo', a[4]) call assert_equal(' " 1 0 aaa', a[5]) call assert_equal(' [ 1 0 aaa', a[6]) call assert_equal(' ] 2 0 bbb', a[7]) call assert_equal(' . 2 0 bbb', a[8]) b Xtwo let a = split(execute('marks'), "\n") call assert_equal(9, len(a)) call assert_equal('mark line col file/text', a[0]) call assert_equal(" ' 1 0 ccc", a[1]) call assert_equal(' c 1 2 ccc', a[2]) call assert_equal(' B 2 2 Xone', a[3]) call assert_equal(' D 2 0 ddd', a[4]) call assert_equal(' " 2 0 ddd', a[5]) call assert_equal(' [ 1 0 ccc', a[6]) call assert_equal(' ] 2 0 ddd', a[7]) call assert_equal(' . 2 0 ddd', a[8]) b Xone delmarks aB let a = split(execute('marks aBcD'), "\n") 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 func Test_marks_cmd_multibyte() new Xone call setline(1, [repeat('á', &columns)]) norm! ma let a = split(execute('marks a'), "\n") call assert_equal(2, len(a)) let expected = ' a 1 0 ' . repeat('á', &columns - 16) call assert_equal(expected, a[1]) bwipe! endfunc