Mercurial > vim

comparison src/testdir/test_cmdline.vim @ 19689:da98d2ed8dc5 v8.2.0401

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.2.0401: not enough test coverage for evalvars.c Commit: https://github.com/vim/vim/commit/8dfcce3a78ccb520cc9d09081f998091494c50bf Author: Bram Moolenaar <Bram@vim.org> Date: Wed Mar 18 19:32:26 2020 +0100 patch 8.2.0401: not enough test coverage for evalvars.c Problem: Not enough test coverage for evalvars.c. Solution: Add more tests. (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/5804)
author Bram Moolenaar <Bram@vim.org>
date Wed, 18 Mar 2020 19:45:04 +0100
parents 9199f34d838e
children b3e93a05c3ca
comparison
equal deleted inserted replaced
19688:8d01c76e0bc7 19689:da98d2ed8dc5
782 call assert_equal('"e `a1b2c', @:) 782 call assert_equal('"e `a1b2c', @:)
783 783
784 " completion for the expression register 784 " completion for the expression register
785 call feedkeys(":\"\<C-R>=float2\t\"\<C-B>\"\<CR>", 'xt') 785 call feedkeys(":\"\<C-R>=float2\t\"\<C-B>\"\<CR>", 'xt')
786 call assert_equal('"float2nr("', @=) 786 call assert_equal('"float2nr("', @=)
787
788 " completion for :language command with an invalid argument
789 call feedkeys(":language dummy \t\<C-B>\"\<CR>", 'xt')
790 call assert_equal("\"language dummy \t", @:)
791
792 " completion for commands after a :global command
793 call feedkeys(":g/a\\xb/call float2\t\<C-B>\"\<CR>", 'xt')
794 call assert_equal('"g/a\xb/call float2nr(', @:)
795
796 " completion with ambiguous user defined commands
797 com TCmd1 echo 'TCmd1'
798 com TCmd2 echo 'TCmd2'
799 call feedkeys(":TCmd \t\<C-B>\"\<CR>", 'xt')
800 call assert_equal('"TCmd ', @:)
801 delcom TCmd1
802 delcom TCmd2
803
804 " completion after a range followed by a pipe (|) character
805 call feedkeys(":1,10 | chist\t\<C-B>\"\<CR>", 'xt')
806 call assert_equal('"1,10 | chistory', @:)
807
808 " completion for window local variables
809 let w:wvar1 = 10
810 let w:wvar2 = 10
811 call feedkeys(":echo w:wvar\<C-A>\<C-B>\"\<CR>", 'xt')
812 call assert_equal('"echo w:wvar1 w:wvar2', @:)
813 unlet w:wvar1 w:wvar2
814
815 " completion for tab local variables
816 let t:tvar1 = 10
817 let t:tvar2 = 10
818 call feedkeys(":echo t:tvar\<C-A>\<C-B>\"\<CR>", 'xt')
819 call assert_equal('"echo t:tvar1 t:tvar2', @:)
820 unlet t:tvar1 t:tvar2
787 endfunc 821 endfunc
788 822
789 func Test_cmdline_write_alternatefile() 823 func Test_cmdline_write_alternatefile()
790 new 824 new
791 call setline('.', ['one', 'two']) 825 call setline('.', ['one', 'two'])
1302 call assert_equal('"MyCmd oneA', @:) 1336 call assert_equal('"MyCmd oneA', @:)
1303 1337
1304 " Test for wildmode=longest with 'fileignorecase' set 1338 " Test for wildmode=longest with 'fileignorecase' set
1305 set wildmode=longest 1339 set wildmode=longest
1306 set fileignorecase 1340 set fileignorecase
1307 argadd AA AAA AAAA 1341 argadd AAA AAAA AAAAA
1308 call feedkeys(":buffer \t\<C-B>\"\<CR>", 'xt') 1342 call feedkeys(":buffer a\t\<C-B>\"\<CR>", 'xt')
1309 call assert_equal('"buffer AA', @:) 1343 call assert_equal('"buffer AAA', @:)
1310 set fileignorecase& 1344 set fileignorecase&
1311 1345
1312 " Test for listing files with wildmode=list 1346 " Test for listing files with wildmode=list
1313 set wildmode=list 1347 set wildmode=list
1314 let g:Sline = '' 1348 let g:Sline = ''
1315 call feedkeys(":b A\t\t\<F2>\<C-B>\"\<CR>", 'xt') 1349 call feedkeys(":b A\t\t\<F2>\<C-B>\"\<CR>", 'xt')
1316 call assert_equal('AA AAA AAAA', g:Sline) 1350 call assert_equal('AAA AAAA AAAAA', g:Sline)
1317 call assert_equal('"b A', @:) 1351 call assert_equal('"b A', @:)
1318 1352
1319 %argdelete 1353 %argdelete
1320 delcommand MyCmd 1354 delcommand MyCmd
1321 delfunc T 1355 delfunc T