Mercurial > vim
view src/testdir/test_arglist.vim @ 20215:ca9c2be2334a v8.2.0663
patch 8.2.0663: not all systemd temp files are recognized
Commit: https://github.com/vim/vim/commit/512fe833c3988bfe0de22135aef67faf51927a0e
Author: Bram Moolenaar <Bram@vim.org>
Date: Wed Apr 29 23:02:40 2020 +0200
patch 8.2.0663: not all systemd temp files are recognized
Problem: Not all systemd temp files are recognized.
Solution: Add two more patterns. (Jamie Macdonald, closes https://github.com/vim/vim/issues/6003)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Wed, 29 Apr 2020 23:15:03 +0200 |
parents | c087099e9163 |
children | 116c7bd5e980 |
line wrap: on
line source
" Test argument list commands source shared.vim source term_util.vim func Test_argidx() args a b c last call assert_equal(2, argidx()) %argdelete call assert_equal(0, argidx()) " doing it again doesn't result in an error %argdelete call assert_equal(0, argidx()) call assert_fails('2argdelete', 'E16:') args a b c call assert_equal(0, argidx()) next call assert_equal(1, argidx()) next call assert_equal(2, argidx()) 1argdelete call assert_equal(1, argidx()) 1argdelete call assert_equal(0, argidx()) 1argdelete call assert_equal(0, argidx()) endfunc func Test_argadd() %argdelete argadd a b c call assert_equal(0, argidx()) %argdelete argadd a call assert_equal(0, argidx()) argadd b c d call assert_equal(0, argidx()) call Init_abc() argadd x call Assert_argc(['a', 'b', 'x', 'c']) call assert_equal(1, argidx()) call Init_abc() 0argadd x call Assert_argc(['x', 'a', 'b', 'c']) call assert_equal(2, argidx()) call Init_abc() 1argadd x call Assert_argc(['a', 'x', 'b', 'c']) call assert_equal(2, argidx()) call Init_abc() $argadd x call Assert_argc(['a', 'b', 'c', 'x']) call assert_equal(1, argidx()) call Init_abc() $argadd x +2argadd y call Assert_argc(['a', 'b', 'c', 'x', 'y']) call assert_equal(1, argidx()) %argd edit d arga call assert_equal(1, len(argv())) call assert_equal('d', get(argv(), 0, '')) %argd edit some\ file arga call assert_equal(1, len(argv())) call assert_equal('some file', get(argv(), 0, '')) %argd new arga call assert_equal(0, len(argv())) endfunc func Test_argadd_empty_curbuf() new let curbuf = bufnr('%') call writefile(['test', 'Xargadd'], 'Xargadd') " must not re-use the current buffer. argadd Xargadd call assert_equal(curbuf, bufnr('%')) call assert_equal('', bufname('%')) call assert_equal(1, '$'->line()) rew call assert_notequal(curbuf, '%'->bufnr()) call assert_equal('Xargadd', '%'->bufname()) call assert_equal(2, line('$')) call delete('Xargadd') %argd bwipe! endfunc func Init_abc() args a b c next endfunc func Assert_argc(l) call assert_equal(len(a:l), argc()) let i = 0 while i < len(a:l) && i < argc() call assert_equal(a:l[i], argv(i)) let i += 1 endwhile endfunc " Test for [count]argument and [count]argdelete commands " Ported from the test_argument_count.in test script func Test_argument() " Clean the argument list arga a | %argd let save_hidden = &hidden set hidden let g:buffers = [] augroup TEST au BufEnter * call add(buffers, expand('%:t')) augroup END argadd a b c d $argu $-argu -argu 1argu +2argu augroup TEST au! augroup END call assert_equal(['d', 'c', 'b', 'a', 'c'], g:buffers) call assert_equal("\na b [c] d ", execute(':args')) .argd call assert_equal(['a', 'b', 'd'], argv()) -argd call assert_equal(['a', 'd'], argv()) $argd call assert_equal(['a'], argv()) 1arga c 1arga b $argu $arga x call assert_equal(['a', 'b', 'c', 'x'], argv()) 0arga y call assert_equal(['y', 'a', 'b', 'c', 'x'], argv()) %argd call assert_equal([], argv()) arga a b c d e f 2,$-argd call assert_equal(['a', 'f'], argv()) let &hidden = save_hidden let save_columns = &columns let &columns = 79 exe 'args ' .. join(range(1, 81)) call assert_equal(join([ \ '', \ '[1] 6 11 16 21 26 31 36 41 46 51 56 61 66 71 76 81 ', \ '2 7 12 17 22 27 32 37 42 47 52 57 62 67 72 77 ', \ '3 8 13 18 23 28 33 38 43 48 53 58 63 68 73 78 ', \ '4 9 14 19 24 29 34 39 44 49 54 59 64 69 74 79 ', \ '5 10 15 20 25 30 35 40 45 50 55 60 65 70 75 80 ', \ ], "\n"), \ execute('args')) " No trailing newline with one item per row. let long_arg = repeat('X', 81) exe 'args ' .. long_arg call assert_equal("\n[".long_arg.']', execute('args')) let &columns = save_columns " Setting argument list should fail when the current buffer has unsaved " changes %argd enew! set modified call assert_fails('args x y z', 'E37:') args! x y z call assert_equal(['x', 'y', 'z'], argv()) call assert_equal('x', expand('%:t')) last | enew | argu call assert_equal('z', expand('%:t')) %argdelete call assert_fails('argument', 'E163:') endfunc func Test_list_arguments() " Clean the argument list arga a | %argd " four args half the screen width makes two lines with two columns let aarg = repeat('a', &columns / 2 - 4) let barg = repeat('b', &columns / 2 - 4) let carg = repeat('c', &columns / 2 - 4) let darg = repeat('d', &columns / 2 - 4) exe 'argadd ' aarg barg carg darg redir => result args redir END call assert_match('\[' . aarg . '] \+' . carg . '\n' . barg . ' \+' . darg, trim(result)) " if one arg is longer than half the screen make one column exe 'argdel' aarg let aarg = repeat('a', &columns / 2 + 2) exe '0argadd' aarg redir => result args redir END call assert_match(aarg . '\n\[' . barg . ']\n' . carg . '\n' . darg, trim(result)) %argdelete endfunc func Test_args_with_quote() " Only on Unix can a file name include a double quote. if has('unix') args \"foobar call assert_equal('"foobar', argv(0)) %argdelete endif endfunc " Test for 0argadd and 0argedit " Ported from the test_argument_0count.in test script func Test_zero_argadd() " Clean the argument list arga a | %argd arga a b c d 2argu 0arga added call assert_equal(['added', 'a', 'b', 'c', 'd'], argv()) 2argu arga third call assert_equal(['added', 'a', 'third', 'b', 'c', 'd'], argv()) %argd arga a b c d 2argu 0arge edited call assert_equal(['edited', 'a', 'b', 'c', 'd'], argv()) 2argu arga third call assert_equal(['edited', 'a', 'third', 'b', 'c', 'd'], argv()) 2argu argedit file\ with\ spaces another file call assert_equal(['edited', 'a', 'file with spaces', 'another', 'file', 'third', 'b', 'c', 'd'], argv()) call assert_equal('file with spaces', expand('%')) endfunc func Reset_arglist() args a | %argd endfunc " Test for argc() func Test_argc() call Reset_arglist() call assert_equal(0, argc()) argadd a b call assert_equal(2, argc()) endfunc " Test for arglistid() func Test_arglistid() call Reset_arglist() arga a b call assert_equal(0, arglistid()) split arglocal call assert_equal(1, arglistid()) tabnew | tabfirst call assert_equal(0, arglistid(2)) call assert_equal(1, arglistid(1, 1)) call assert_equal(0, arglistid(2, 1)) call assert_equal(1, arglistid(1, 2)) tabonly | only | enew! argglobal call assert_equal(0, arglistid()) endfunc " Tests for argv() and argc() func Test_argv() call Reset_arglist() call assert_equal([], argv()) call assert_equal("", argv(2)) call assert_equal(0, argc()) argadd a b c d call assert_equal(4, argc()) call assert_equal('c', argv(2)) let w1_id = win_getid() split let w2_id = win_getid() arglocal args e f g tabnew let w3_id = win_getid() split let w4_id = win_getid() argglobal tabfirst call assert_equal(4, argc(w1_id)) call assert_equal('b', argv(1, w1_id)) call assert_equal(['a', 'b', 'c', 'd'], argv(-1, w1_id)) call assert_equal(3, argc(w2_id)) call assert_equal('f', argv(1, w2_id)) call assert_equal(['e', 'f', 'g'], argv(-1, w2_id)) call assert_equal(3, argc(w3_id)) call assert_equal('e', argv(0, w3_id)) call assert_equal(['e', 'f', 'g'], argv(-1, w3_id)) call assert_equal(4, argc(w4_id)) call assert_equal('c', argv(2, w4_id)) call assert_equal(['a', 'b', 'c', 'd'], argv(-1, w4_id)) call assert_equal(4, argc(-1)) call assert_equal(3, argc()) call assert_equal('d', argv(3, -1)) call assert_equal(['a', 'b', 'c', 'd'], argv(-1, -1)) tabonly | only | enew! " Negative test cases call assert_equal(-1, argc(100)) call assert_equal('', argv(1, 100)) call assert_equal([], argv(-1, 100)) call assert_equal('', argv(10, -1)) endfunc " Test for the :argedit command func Test_argedit() call Reset_arglist() argedit a call assert_equal(['a'], argv()) call assert_equal('a', expand('%:t')) argedit b call assert_equal(['a', 'b'], argv()) call assert_equal('b', expand('%:t')) argedit a call assert_equal(['a', 'b', 'a'], argv()) call assert_equal('a', expand('%:t')) " When file name case is ignored, an existing buffer with only case " difference is re-used. argedit C D call assert_equal('C', expand('%:t')) call assert_equal(['a', 'b', 'a', 'C', 'D'], argv()) argedit c if has('fname_case') call assert_equal(['a', 'b', 'a', 'C', 'c', 'D'], argv()) else call assert_equal(['a', 'b', 'a', 'C', 'C', 'D'], argv()) endif 0argedit x if has('fname_case') call assert_equal(['x', 'a', 'b', 'a', 'C', 'c', 'D'], argv()) else call assert_equal(['x', 'a', 'b', 'a', 'C', 'C', 'D'], argv()) endif enew! | set modified call assert_fails('argedit y', 'E37:') argedit! y if has('fname_case') call assert_equal(['x', 'y', 'y', 'a', 'b', 'a', 'C', 'c', 'D'], argv()) else call assert_equal(['x', 'y', 'y', 'a', 'b', 'a', 'C', 'C', 'D'], argv()) endif %argd bwipe! C bwipe! D " :argedit reuses the current buffer if it is empty %argd " make sure to use a new buffer number for x when it is loaded bw! x new let a = bufnr() argedit x call assert_equal(a, bufnr()) call assert_equal('x', bufname()) %argd bw! x endfunc " Test for the :argdelete command func Test_argdelete() call Reset_arglist() args aa a aaa b bb argdelete a* call assert_equal(['b', 'bb'], argv()) call assert_equal('aa', expand('%:t')) last argdelete % call assert_equal(['b'], argv()) call assert_fails('argdelete', 'E471:') call assert_fails('1,100argdelete', 'E16:') %argd endfunc func Test_argdelete_completion() args foo bar call feedkeys(":argdelete \<C-A>\<C-B>\"\<CR>", 'tx') call assert_equal('"argdelete bar foo', @:) call feedkeys(":argdelete x \<C-A>\<C-B>\"\<CR>", 'tx') call assert_equal('"argdelete x bar foo', @:) %argd endfunc " Tests for the :next, :prev, :first, :last, :rewind commands func Test_argpos() call Reset_arglist() args a b c d last call assert_equal(3, argidx()) call assert_fails('next', 'E165:') prev call assert_equal(2, argidx()) Next call assert_equal(1, argidx()) first call assert_equal(0, argidx()) call assert_fails('prev', 'E164:') 3next call assert_equal(3, argidx()) rewind call assert_equal(0, argidx()) %argd endfunc " Test for autocommand that redefines the argument list, when doing ":all". func Test_arglist_autocmd() autocmd BufReadPost Xxx2 next Xxx2 Xxx1 call writefile(['test file Xxx1'], 'Xxx1') call writefile(['test file Xxx2'], 'Xxx2') call writefile(['test file Xxx3'], 'Xxx3') new " redefine arglist; go to Xxx1 next! Xxx1 Xxx2 Xxx3 " open window for all args all call assert_equal('test file Xxx1', getline(1)) wincmd w wincmd w call assert_equal('test file Xxx1', getline(1)) " should now be in Xxx2 rewind call assert_equal('test file Xxx2', getline(1)) autocmd! BufReadPost Xxx2 enew! | only call delete('Xxx1') call delete('Xxx2') call delete('Xxx3') argdelete Xxx* bwipe! Xxx1 Xxx2 Xxx3 endfunc func Test_arg_all_expand() call writefile(['test file Xxx1'], 'Xx x') next notexist Xx\ x runtest.vim call assert_equal('notexist Xx\ x runtest.vim', expand('##')) call delete('Xx x') endfunc func Test_large_arg() " Argument longer or equal to the number of columns used to cause " access to invalid memory. exe 'argadd ' .repeat('x', &columns) args endfunc func Test_argdo() next! Xa.c Xb.c Xc.c new let l = [] argdo call add(l, expand('%')) call assert_equal(['Xa.c', 'Xb.c', 'Xc.c'], l) bwipe Xa.c Xb.c Xc.c endfunc " Test for quiting Vim with unedited files in the argument list func Test_quit_with_arglist() if !CanRunVimInTerminal() throw 'Skipped: cannot run vim in terminal' endif let buf = RunVimInTerminal('', {'rows': 6}) call term_sendkeys(buf, ":set nomore\n") call term_sendkeys(buf, ":args a b c\n") call term_sendkeys(buf, ":quit\n") call TermWait(buf) call WaitForAssert({-> assert_match('^E173:', term_getline(buf, 6))}) call StopVimInTerminal(buf) " Try :confirm quit with unedited files in arglist let buf = RunVimInTerminal('', {'rows': 6}) call term_sendkeys(buf, ":set nomore\n") call term_sendkeys(buf, ":args a b c\n") call term_sendkeys(buf, ":confirm quit\n") call TermWait(buf) call WaitForAssert({-> assert_match('^\[Y\]es, (N)o: *$', \ term_getline(buf, 6))}) call term_sendkeys(buf, "N") call TermWait(buf) call term_sendkeys(buf, ":confirm quit\n") call WaitForAssert({-> assert_match('^\[Y\]es, (N)o: *$', \ term_getline(buf, 6))}) call term_sendkeys(buf, "Y") call TermWait(buf) call WaitForAssert({-> assert_equal("finished", term_getstatus(buf))}) only! " When this test fails, swap files are left behind which breaks subsequent " tests call delete('.a.swp') call delete('.b.swp') call delete('.c.swp') endfunc " vim: shiftwidth=2 sts=2 expandtab