forked from aniani/vim
9cea87c577
Problem: ml_get error and crash with appendbufline(). (Masashi Iizuka) Solution: Set per-window buffer info. (Hirohito Higashi, closes #3455)
142 lines
3.9 KiB
VimL
142 lines
3.9 KiB
VimL
" Tests for setbufline(), getbufline(), appendbufline(), deletebufline()
|
|
|
|
source shared.vim
|
|
|
|
func Test_setbufline_getbufline()
|
|
new
|
|
let b = bufnr('%')
|
|
hide
|
|
call assert_equal(0, setbufline(b, 1, ['foo', 'bar']))
|
|
call assert_equal(['foo'], getbufline(b, 1))
|
|
call assert_equal(['bar'], getbufline(b, 2))
|
|
call assert_equal(['foo', 'bar'], getbufline(b, 1, 2))
|
|
exe "bd!" b
|
|
call assert_equal([], getbufline(b, 1, 2))
|
|
|
|
split Xtest
|
|
call setline(1, ['a', 'b', 'c'])
|
|
let b = bufnr('%')
|
|
wincmd w
|
|
call assert_equal(1, setbufline(b, 5, ['x']))
|
|
call assert_equal(1, setbufline(1234, 1, ['x']))
|
|
call assert_equal(0, setbufline(b, 4, ['d', 'e']))
|
|
call assert_equal(['c'], getbufline(b, 3))
|
|
call assert_equal(['d'], getbufline(b, 4))
|
|
call assert_equal(['e'], getbufline(b, 5))
|
|
call assert_equal([], getbufline(b, 6))
|
|
exe "bwipe! " . b
|
|
endfunc
|
|
|
|
func Test_setbufline_getbufline_fold()
|
|
split Xtest
|
|
setlocal foldmethod=expr foldexpr=0
|
|
let b = bufnr('%')
|
|
new
|
|
call assert_equal(0, setbufline(b, 1, ['foo', 'bar']))
|
|
call assert_equal(['foo'], getbufline(b, 1))
|
|
call assert_equal(['bar'], getbufline(b, 2))
|
|
call assert_equal(['foo', 'bar'], getbufline(b, 1, 2))
|
|
exe "bwipe!" b
|
|
bwipe!
|
|
endfunc
|
|
|
|
func Test_setbufline_getbufline_fold_tab()
|
|
split Xtest
|
|
setlocal foldmethod=expr foldexpr=0
|
|
let b = bufnr('%')
|
|
tab new
|
|
call assert_equal(0, setbufline(b, 1, ['foo', 'bar']))
|
|
call assert_equal(['foo'], getbufline(b, 1))
|
|
call assert_equal(['bar'], getbufline(b, 2))
|
|
call assert_equal(['foo', 'bar'], getbufline(b, 1, 2))
|
|
exe "bwipe!" b
|
|
bwipe!
|
|
endfunc
|
|
|
|
func Test_setline_startup()
|
|
let cmd = GetVimCommand('Xscript')
|
|
if cmd == ''
|
|
return
|
|
endif
|
|
call writefile(['call setline(1, "Hello")', 'silent w Xtest', 'q!'], 'Xscript')
|
|
call system(cmd)
|
|
call assert_equal(['Hello'], readfile('Xtest'))
|
|
|
|
call delete('Xscript')
|
|
call delete('Xtest')
|
|
endfunc
|
|
|
|
func Test_appendbufline()
|
|
new
|
|
let b = bufnr('%')
|
|
hide
|
|
call assert_equal(0, appendbufline(b, 0, ['foo', 'bar']))
|
|
call assert_equal(['foo'], getbufline(b, 1))
|
|
call assert_equal(['bar'], getbufline(b, 2))
|
|
call assert_equal(['foo', 'bar'], getbufline(b, 1, 2))
|
|
exe "bd!" b
|
|
call assert_equal([], getbufline(b, 1, 2))
|
|
|
|
split Xtest
|
|
call setline(1, ['a', 'b', 'c'])
|
|
let b = bufnr('%')
|
|
wincmd w
|
|
call assert_equal(1, appendbufline(b, 4, ['x']))
|
|
call assert_equal(1, appendbufline(1234, 1, ['x']))
|
|
call assert_equal(0, appendbufline(b, 3, ['d', 'e']))
|
|
call assert_equal(['c'], getbufline(b, 3))
|
|
call assert_equal(['d'], getbufline(b, 4))
|
|
call assert_equal(['e'], getbufline(b, 5))
|
|
call assert_equal([], getbufline(b, 6))
|
|
exe "bwipe! " . b
|
|
endfunc
|
|
|
|
func Test_appendbufline_no_E315()
|
|
let after = [
|
|
\ 'set stl=%f ls=2',
|
|
\ 'new',
|
|
\ 'let buf = bufnr("%")',
|
|
\ 'quit',
|
|
\ 'vsp',
|
|
\ 'exec "buffer" buf',
|
|
\ 'wincmd w',
|
|
\ 'call appendbufline(buf, 0, "abc")',
|
|
\ 'redraw',
|
|
\ 'while getbufline(buf, 1)[0] =~ "^\\s*$"',
|
|
\ ' sleep 10m',
|
|
\ 'endwhile',
|
|
\ 'au VimLeavePre * call writefile([v:errmsg], "Xerror")',
|
|
\ 'au VimLeavePre * call writefile(["done"], "Xdone")',
|
|
\ 'qall!',
|
|
\ ]
|
|
if !RunVim([], after, '--clean')
|
|
return
|
|
endif
|
|
call assert_notmatch("^E315:", readfile("Xerror")[0])
|
|
call assert_equal("done", readfile("Xdone")[0])
|
|
call delete("Xerror")
|
|
call delete("Xdone")
|
|
endfunc
|
|
|
|
func Test_deletebufline()
|
|
new
|
|
let b = bufnr('%')
|
|
call setline(1, ['aaa', 'bbb', 'ccc'])
|
|
hide
|
|
call assert_equal(0, deletebufline(b, 2))
|
|
call assert_equal(['aaa', 'ccc'], getbufline(b, 1, 2))
|
|
call assert_equal(0, deletebufline(b, 2, 8))
|
|
call assert_equal(['aaa'], getbufline(b, 1, 2))
|
|
exe "bd!" b
|
|
call assert_equal(1, deletebufline(b, 1))
|
|
|
|
split Xtest
|
|
call setline(1, ['a', 'b', 'c'])
|
|
let b = bufnr('%')
|
|
wincmd w
|
|
call assert_equal(1, deletebufline(b, 4))
|
|
call assert_equal(0, deletebufline(b, 1))
|
|
call assert_equal(['b', 'c'], getbufline(b, 1, 2))
|
|
exe "bwipe! " . b
|
|
endfunc
|