Mercurial > vim
diff src/testdir/test_listener.vim @ 16648:a7f06505ad39 v8.1.1326
patch 8.1.1326: no test for listener with partial
commit https://github.com/vim/vim/commit/8aad88d8de256e58f04054eb7230c9613e26502f
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun May 12 13:53:50 2019 +0200
patch 8.1.1326: no test for listener with partial
Problem: No test for listener with partial.
Solution: Add a test. Add example to help.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sun, 12 May 2019 14:00:07 +0200 |
parents | 4790302965fc |
children | b8fda384605b |
line wrap: on
line diff
--- a/src/testdir/test_listener.vim +++ b/src/testdir/test_listener.vim @@ -1,77 +1,86 @@ " tests for listener_add() and listener_remove() -func StoreList(l) - let g:list = a:l +func s:StoreList(l) + let s:list = a:l endfunc -func AnotherStoreList(l) - let g:list2 = a:l +func s:AnotherStoreList(l) + let s:list2 = a:l endfunc -func EvilStoreList(l) - let g:list3 = a:l +func s:EvilStoreList(l) + let s:list3 = a:l call assert_fails("call add(a:l, 'myitem')", "E742:") endfunc func Test_listening() new call setline(1, ['one', 'two']) - let id = listener_add({l -> StoreList(l)}) + let id = listener_add({l -> s:StoreList(l)}) call setline(1, 'one one') redraw - call assert_equal([{'lnum': 1, 'end': 2, 'col': 1, 'added': 0}], g:list) + call assert_equal([{'lnum': 1, 'end': 2, 'col': 1, 'added': 0}], s:list) " Two listeners, both get called. - let id2 = listener_add({l -> AnotherStoreList(l)}) - let g:list = [] - let g:list2 = [] + let id2 = listener_add({l -> s:AnotherStoreList(l)}) + let s:list = [] + let s:list2 = [] exe "normal $asome\<Esc>" redraw - call assert_equal([{'lnum': 1, 'end': 2, 'col': 8, 'added': 0}], g:list) - call assert_equal([{'lnum': 1, 'end': 2, 'col': 8, 'added': 0}], g:list2) + call assert_equal([{'lnum': 1, 'end': 2, 'col': 8, 'added': 0}], s:list) + call assert_equal([{'lnum': 1, 'end': 2, 'col': 8, 'added': 0}], s:list2) call listener_remove(id2) - let g:list = [] - let g:list2 = [] + let s:list = [] + let s:list2 = [] call setline(3, 'three') redraw - call assert_equal([{'lnum': 3, 'end': 3, 'col': 1, 'added': 1}], g:list) - call assert_equal([], g:list2) + call assert_equal([{'lnum': 3, 'end': 3, 'col': 1, 'added': 1}], s:list) + call assert_equal([], s:list2) " the "o" command first adds an empty line and then changes it - let g:list = [] + let s:list = [] exe "normal Gofour\<Esc>" redraw call assert_equal([{'lnum': 4, 'end': 4, 'col': 1, 'added': 1}, - \ {'lnum': 4, 'end': 5, 'col': 1, 'added': 0}], g:list) + \ {'lnum': 4, 'end': 5, 'col': 1, 'added': 0}], s:list) - let g:list = [] + " Remove last listener + let s:list = [] call listener_remove(id) call setline(1, 'asdfasdf') redraw - call assert_equal([], g:list) + call assert_equal([], s:list) " Trying to change the list fails - let id = listener_add({l -> EvilStoreList(l)}) - let g:list3 = [] + let id = listener_add({l -> s:EvilStoreList(l)}) + let s:list3 = [] call setline(1, 'asdfasdf') redraw - call assert_equal([{'lnum': 1, 'end': 2, 'col': 1, 'added': 0}], g:list3) + call assert_equal([{'lnum': 1, 'end': 2, 'col': 1, 'added': 0}], s:list3) + call listener_remove(id) bwipe! endfunc +func s:StoreBufList(buf, l) + let s:bufnr = a:buf + let s:list = a:l +endfunc + func Test_listening_other_buf() new call setline(1, ['one', 'two']) let bufnr = bufnr('') normal ww - let id = listener_add({l -> StoreList(l)}, bufnr) - let g:list = [] + let id = listener_add(function('s:StoreBufList', [bufnr]), bufnr) + let s:list = [] call setbufline(bufnr, 1, 'hello') redraw - call assert_equal([{'lnum': 1, 'end': 2, 'col': 1, 'added': 0}], g:list) + call assert_equal(bufnr, s:bufnr) + call assert_equal([{'lnum': 1, 'end': 2, 'col': 1, 'added': 0}], s:list) + call listener_remove(id) exe "buf " .. bufnr bwipe! endfunc