annotate src/testdir/test_usercommands.vim @ 17890:645284afff66

Added tag v8.1.1941 for changeset 0d64e74be8b2150e63979db1f34aa0f653cac7fa
author Bram Moolenaar <Bram@vim.org>
date Fri, 30 Aug 2019 13:15:04 +0200
parents 854fb0ad4be6
children 9199f34d838e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Tests for user defined commands
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3 " Test for <mods> in user defined commands
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
4 function Test_cmdmods()
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5 let g:mods = ''
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7 command! -nargs=* MyCmd let g:mods .= '<mods> '
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 MyCmd
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 aboveleft MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
11 abo MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 belowright MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
13 bel MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 botright MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
15 bo MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 browse MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
17 bro MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 confirm MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
19 conf MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20 hide MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
21 hid MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 keepalt MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
23 keepa MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 keepjumps MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
25 keepj MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 keepmarks MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
27 kee MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 keeppatterns MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
29 keepp MyCmd
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
30 leftabove MyCmd " results in :aboveleft
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
31 lefta MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
32 lockmarks MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
33 loc MyCmd
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
34 " noautocmd MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 noswapfile MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
36 nos MyCmd
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
37 rightbelow MyCmd " results in :belowright
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
38 rightb MyCmd
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
39 " sandbox MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
40 silent MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
41 sil MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
42 tab MyCmd
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
43 topleft MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
44 to MyCmd
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
45 " unsilent MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
46 verbose MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
47 verb MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
48 vertical MyCmd
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
49 vert MyCmd
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
50
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
51 aboveleft belowright botright browse confirm hide keepalt keepjumps
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
52 \ keepmarks keeppatterns lockmarks noswapfile silent tab
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
53 \ topleft verbose vertical MyCmd
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
54
9703
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
55 call assert_equal(' aboveleft aboveleft belowright belowright botright ' .
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
56 \ 'botright browse browse confirm confirm hide hide ' .
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
57 \ 'keepalt keepalt keepjumps keepjumps keepmarks keepmarks ' .
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
58 \ 'keeppatterns keeppatterns aboveleft aboveleft lockmarks lockmarks noswapfile ' .
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
59 \ 'noswapfile belowright belowright silent silent tab topleft topleft verbose verbose ' .
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
60 \ 'vertical vertical ' .
1f33aece8e55 commit https://github.com/vim/vim/commit/3bcfca3ab4db415d0e750e00204dd25a91fcee77
Christian Brabandt <cb@256bit.org>
parents: 9667
diff changeset
61 \ 'aboveleft belowright botright browse confirm hide keepalt keepjumps ' .
9230
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
62 \ 'keepmarks keeppatterns lockmarks noswapfile silent tab topleft ' .
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
63 \ 'verbose vertical ', g:mods)
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
64
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
65 let g:mods = ''
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
66 command! -nargs=* MyQCmd let g:mods .= '<q-mods> '
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
67
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
68 vertical MyQCmd
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
69 call assert_equal('"vertical" ', g:mods)
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
70
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
71 delcommand MyCmd
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
72 delcommand MyQCmd
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
73 unlet g:mods
f7fb117883ba commit https://github.com/vim/vim/commit/63a60ded3fd584847a05dccf058026e682abad90
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
74 endfunction
9667
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
75
16413
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
76 func SaveCmdArgs(...)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
77 let g:args = a:000
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
78 endfunc
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
79
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
80 func Test_f_args()
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
81 command -nargs=* TestFArgs call SaveCmdArgs(<f-args>)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
82
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
83 TestFArgs
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
84 call assert_equal([], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
85
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
86 TestFArgs one two three
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
87 call assert_equal(['one', 'two', 'three'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
88
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
89 TestFArgs one\\two three
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
90 call assert_equal(['one\two', 'three'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
91
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
92 TestFArgs one\ two three
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
93 call assert_equal(['one two', 'three'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
94
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
95 TestFArgs one\"two three
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
96 call assert_equal(['one\"two', 'three'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
97
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
98 delcommand TestFArgs
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
99 endfunc
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
100
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
101 func Test_q_args()
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
102 command -nargs=* TestQArgs call SaveCmdArgs(<q-args>)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
103
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
104 TestQArgs
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
105 call assert_equal([''], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
106
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
107 TestQArgs one two three
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
108 call assert_equal(['one two three'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
109
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
110 TestQArgs one\\two three
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
111 call assert_equal(['one\\two three'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
112
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
113 TestQArgs one\ two three
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
114 call assert_equal(['one\ two three'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
115
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
116 TestQArgs one\"two three
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
117 call assert_equal(['one\"two three'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
118
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
119 delcommand TestQArgs
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
120 endfunc
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
121
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
122 func Test_reg_arg()
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
123 command -nargs=* -reg TestRegArg call SaveCmdArgs("<reg>", "<register>")
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
124
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
125 TestRegArg
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
126 call assert_equal(['', ''], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
127
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
128 TestRegArg x
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
129 call assert_equal(['x', 'x'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
130
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
131 delcommand TestRegArg
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
132 endfunc
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
133
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
134 func Test_no_arg()
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
135 command -nargs=* TestNoArg call SaveCmdArgs("<args>", "<>", "<x>", "<lt>")
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
136
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
137 TestNoArg
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
138 call assert_equal(['', '<>', '<x>', '<'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
139
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
140 TestNoArg one
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
141 call assert_equal(['one', '<>', '<x>', '<'], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
142
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
143 delcommand TestNoArg
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
144 endfunc
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
145
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
146 func Test_range_arg()
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
147 command -range TestRangeArg call SaveCmdArgs(<range>, <line1>, <line2>)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
148 new
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
149 call setline(1, range(100))
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
150 let lnum = line('.')
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
151
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
152 TestRangeArg
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
153 call assert_equal([0, lnum, lnum], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
154
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
155 99TestRangeArg
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
156 call assert_equal([1, 99, 99], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
157
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
158 88,99TestRangeArg
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
159 call assert_equal([2, 88, 99], g:args)
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
160
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
161 call assert_fails('102TestRangeArg', 'E16:')
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
162
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
163 bwipe!
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
164 delcommand TestRangeArg
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
165 endfunc
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
166
9667
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
167 func Test_Ambiguous()
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
168 command Doit let g:didit = 'yes'
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
169 command Dothat let g:didthat = 'also'
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
170 call assert_fails('Do', 'E464:')
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
171 Doit
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
172 call assert_equal('yes', g:didit)
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
173 Dothat
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
174 call assert_equal('also', g:didthat)
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
175 unlet g:didit
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
176 unlet g:didthat
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
177
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
178 delcommand Doit
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
179 Do
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
180 call assert_equal('also', g:didthat)
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
181 delcommand Dothat
16413
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
182
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
183 call assert_fails("\x4ei\041", ' you demand a ')
9667
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
184 endfunc
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
185
15125
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
186 func Test_redefine_on_reload()
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
187 call writefile(['command ExistingCommand echo "yes"'], 'Xcommandexists')
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
188 call assert_equal(0, exists(':ExistingCommand'))
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
189 source Xcommandexists
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
190 call assert_equal(2, exists(':ExistingCommand'))
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
191 " Redefining a command when reloading a script is OK.
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
192 source Xcommandexists
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
193 call assert_equal(2, exists(':ExistingCommand'))
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
194
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
195 " But redefining in another script is not OK.
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
196 call writefile(['command ExistingCommand echo "yes"'], 'Xcommandexists2')
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
197 call assert_fails('source Xcommandexists2', 'E174:')
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
198 call delete('Xcommandexists2')
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
199
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
200 " And defining twice in one script is not OK.
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
201 delcommand ExistingCommand
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
202 call assert_equal(0, exists(':ExistingCommand'))
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
203 call writefile([
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
204 \ 'command ExistingCommand echo "yes"',
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
205 \ 'command ExistingCommand echo "no"',
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
206 \ ], 'Xcommandexists')
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
207 call assert_fails('source Xcommandexists', 'E174:')
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
208 call assert_equal(2, exists(':ExistingCommand'))
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
209
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
210 call delete('Xcommandexists')
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
211 delcommand ExistingCommand
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
212 endfunc
b101b193d5ff patch 8.1.0573: cannot redefine user command without ! in same script
Bram Moolenaar <Bram@vim.org>
parents: 15099
diff changeset
213
9667
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
214 func Test_CmdUndefined()
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
215 call assert_fails('Doit', 'E492:')
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
216 au CmdUndefined Doit :command Doit let g:didit = 'yes'
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
217 Doit
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
218 call assert_equal('yes', g:didit)
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
219 delcommand Doit
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
220
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
221 call assert_fails('Dothat', 'E492:')
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
222 au CmdUndefined * let g:didnot = 'yes'
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
223 call assert_fails('Dothat', 'E492:')
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
224 call assert_equal('yes', g:didnot)
c27052511998 commit https://github.com/vim/vim/commit/eac784eced501c54d2c99e18a1af96cd996f3a6c
Christian Brabandt <cb@256bit.org>
parents: 9230
diff changeset
225 endfunc
10704
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
226
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
227 func Test_CmdErrors()
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
228 call assert_fails('com! docmd :', 'E183:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
229 call assert_fails('com! \<Tab> :', 'E182:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
230 call assert_fails('com! _ :', 'E182:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
231 call assert_fails('com! X :', 'E841:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
232 call assert_fails('com! - DoCmd :', 'E175:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
233 call assert_fails('com! -xxx DoCmd :', 'E181:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
234 call assert_fails('com! -addr DoCmd :', 'E179:')
16413
4734d601ebdd patch 8.1.1211: not all user command code is tested
Bram Moolenaar <Bram@vim.org>
parents: 16403
diff changeset
235 call assert_fails('com! -addr=asdf DoCmd :', 'E180:')
10704
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
236 call assert_fails('com! -complete DoCmd :', 'E179:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
237 call assert_fails('com! -complete=xxx DoCmd :', 'E180:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
238 call assert_fails('com! -complete=custom DoCmd :', 'E467:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
239 call assert_fails('com! -complete=customlist DoCmd :', 'E467:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
240 call assert_fails('com! -complete=behave,CustomComplete DoCmd :', 'E468:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
241 call assert_fails('com! -nargs=x DoCmd :', 'E176:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
242 call assert_fails('com! -count=1 -count=2 DoCmd :', 'E177:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
243 call assert_fails('com! -count=x DoCmd :', 'E178:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
244 call assert_fails('com! -range=x DoCmd :', 'E178:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
245
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
246 com! -nargs=0 DoCmd :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
247 call assert_fails('DoCmd x', 'E488:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
248
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
249 com! -nargs=1 DoCmd :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
250 call assert_fails('DoCmd', 'E471:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
251
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
252 com! -nargs=+ DoCmd :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
253 call assert_fails('DoCmd', 'E471:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
254
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
255 call assert_fails('com DoCmd :', 'E174:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
256 comclear
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
257 call assert_fails('delcom DoCmd', 'E184:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
258 endfunc
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
259
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
260 func CustomComplete(A, L, P)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
261 return "January\nFebruary\nMars\n"
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
262 endfunc
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
263
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
264 func CustomCompleteList(A, L, P)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
265 return [ "Monday", "Tuesday", "Wednesday" ]
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
266 endfunc
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
267
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
268 func Test_CmdCompletion()
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
269 call feedkeys(":com -\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
270 call assert_equal('"com -addr bang bar buffer complete count nargs range register', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
271
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
272 call feedkeys(":com -nargs=0 -\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
273 call assert_equal('"com -nargs=0 -addr bang bar buffer complete count nargs range register', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
274
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
275 call feedkeys(":com -nargs=\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
276 call assert_equal('"com -nargs=* + 0 1 ?', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
277
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
278 call feedkeys(":com -addr=\<C-A>\<C-B>\"\<CR>", 'tx')
15099
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
279 call assert_equal('"com -addr=arguments buffers lines loaded_buffers other quickfix tabs windows', @:)
10704
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
280
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
281 call feedkeys(":com -complete=co\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
282 call assert_equal('"com -complete=color command compiler', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
283
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
284 command! DoCmd1 :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
285 command! DoCmd2 :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
286 call feedkeys(":com \<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
287 call assert_equal('"com DoCmd1 DoCmd2', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
288
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
289 call feedkeys(":DoC\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
290 call assert_equal('"DoCmd1 DoCmd2', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
291
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
292 call feedkeys(":delcom DoC\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
293 call assert_equal('"delcom DoCmd1 DoCmd2', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
294
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
295 delcom DoCmd1
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
296 call feedkeys(":delcom DoC\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
297 call assert_equal('"delcom DoCmd2', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
298
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
299 call feedkeys(":com DoC\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
300 call assert_equal('"com DoCmd2', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
301
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
302 delcom DoCmd2
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
303 call feedkeys(":delcom DoC\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
304 call assert_equal('"delcom DoC', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
305
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
306 call feedkeys(":com DoC\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
307 call assert_equal('"com DoC', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
308
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
309 com! -complete=behave DoCmd :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
310 call feedkeys(":DoCmd \<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
311 call assert_equal('"DoCmd mswin xterm', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
312
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
313 " This does not work. Why?
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
314 "call feedkeys(":DoCmd x\<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
315 "call assert_equal('"DoCmd xterm', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
316
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
317 com! -complete=custom,CustomComplete DoCmd :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
318 call feedkeys(":DoCmd \<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
319 call assert_equal('"DoCmd January February Mars', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
320
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
321 com! -complete=customlist,CustomCompleteList DoCmd :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
322 call feedkeys(":DoCmd \<C-A>\<C-B>\"\<CR>", 'tx')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
323 call assert_equal('"DoCmd Monday Tuesday Wednesday', @:)
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
324
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
325 com! -complete=custom,CustomCompleteList DoCmd :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
326 call assert_fails("call feedkeys(':DoCmd \<C-D>', 'tx')", 'E730:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
327
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
328 com! -complete=customlist,CustomComp DoCmd :
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
329 call assert_fails("call feedkeys(':DoCmd \<C-D>', 'tx')", 'E117:')
6736cb425720 patch 8.0.0242: no tests for user command completion
Christian Brabandt <cb@256bit.org>
parents: 9703
diff changeset
330 endfunc
13101
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
331
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
332 func CallExecute(A, L, P)
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
333 " Drop first '\n'
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
334 return execute('echo "hi"')[1:]
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
335 endfunc
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
336
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
337 func Test_use_execute_in_completion()
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
338 command! -nargs=* -complete=custom,CallExecute DoExec :
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
339 call feedkeys(":DoExec \<C-A>\<C-B>\"\<CR>", 'tx')
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
340 call assert_equal('"DoExec hi', @:)
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
341 delcommand DoExec
9b3f8029a326 patch 8.0.1425: execute() does not work in completion of user command
Christian Brabandt <cb@256bit.org>
parents: 12644
diff changeset
342 endfunc
15099
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
343
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
344 func Test_addr_all()
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
345 command! -addr=lines DoSomething let g:a1 = <line1> | let g:a2 = <line2>
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
346 %DoSomething
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
347 call assert_equal(1, g:a1)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
348 call assert_equal(line('$'), g:a2)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
349
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
350 command! -addr=arguments DoSomething let g:a1 = <line1> | let g:a2 = <line2>
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
351 args one two three
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
352 %DoSomething
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
353 call assert_equal(1, g:a1)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
354 call assert_equal(3, g:a2)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
355
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
356 command! -addr=buffers DoSomething let g:a1 = <line1> | let g:a2 = <line2>
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
357 %DoSomething
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
358 for low in range(1, bufnr('$'))
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
359 if buflisted(low)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
360 break
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
361 endif
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
362 endfor
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
363 call assert_equal(low, g:a1)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
364 call assert_equal(bufnr('$'), g:a2)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
365
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
366 command! -addr=loaded_buffers DoSomething let g:a1 = <line1> | let g:a2 = <line2>
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
367 %DoSomething
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
368 for low in range(1, bufnr('$'))
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
369 if bufloaded(low)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
370 break
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
371 endif
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
372 endfor
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
373 call assert_equal(low, g:a1)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
374 for up in range(bufnr('$'), 1, -1)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
375 if bufloaded(up)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
376 break
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
377 endif
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
378 endfor
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
379 call assert_equal(up, g:a2)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
380
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
381 command! -addr=windows DoSomething let g:a1 = <line1> | let g:a2 = <line2>
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
382 new
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
383 %DoSomething
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
384 call assert_equal(1, g:a1)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
385 call assert_equal(winnr('$'), g:a2)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
386 bwipe
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
387
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
388 command! -addr=tabs DoSomething let g:a1 = <line1> | let g:a2 = <line2>
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
389 tabnew
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
390 %DoSomething
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
391 call assert_equal(1, g:a1)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
392 call assert_equal(len(gettabinfo()), g:a2)
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
393 bwipe
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
394
16475
854fb0ad4be6 patch 8.1.1241: Ex command info contains confusing information
Bram Moolenaar <Bram@vim.org>
parents: 16413
diff changeset
395 command! -addr=other DoSomething let g:a1 = <line1> | let g:a2 = <line2>
15099
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
396 DoSomething
16475
854fb0ad4be6 patch 8.1.1241: Ex command info contains confusing information
Bram Moolenaar <Bram@vim.org>
parents: 16413
diff changeset
397 call assert_equal(line('.'), g:a1)
854fb0ad4be6 patch 8.1.1241: Ex command info contains confusing information
Bram Moolenaar <Bram@vim.org>
parents: 16413
diff changeset
398 call assert_equal(line('.'), g:a2)
854fb0ad4be6 patch 8.1.1241: Ex command info contains confusing information
Bram Moolenaar <Bram@vim.org>
parents: 16413
diff changeset
399 %DoSomething
854fb0ad4be6 patch 8.1.1241: Ex command info contains confusing information
Bram Moolenaar <Bram@vim.org>
parents: 16413
diff changeset
400 call assert_equal(1, g:a1)
854fb0ad4be6 patch 8.1.1241: Ex command info contains confusing information
Bram Moolenaar <Bram@vim.org>
parents: 16413
diff changeset
401 call assert_equal(line('$'), g:a2)
15099
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
402
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
403 delcommand DoSomething
39728d503e47 patch 8.1.0560: cannot use address type "other" with with user command
Bram Moolenaar <Bram@vim.org>
parents: 13101
diff changeset
404 endfunc
16403
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
405
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
406 func Test_command_list()
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
407 command! DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
408 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
409 \ .. "\n DoCmd 0 :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
410 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
411
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
412 " Test with various -range= and -count= argument values.
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
413 command! -range DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
414 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
415 \ .. "\n DoCmd 0 . :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
416 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
417 command! -range=% DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
418 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
419 \ .. "\n DoCmd 0 % :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
420 \ execute('command! DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
421 command! -range=2 DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
422 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
423 \ .. "\n DoCmd 0 2 :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
424 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
425 command! -count=2 DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
426 call assert_equal("\n Name Args Address Complete Definition"
16475
854fb0ad4be6 patch 8.1.1241: Ex command info contains confusing information
Bram Moolenaar <Bram@vim.org>
parents: 16413
diff changeset
427 \ .. "\n DoCmd 0 2c ? :",
16403
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
428 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
429
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
430 " Test with various -addr= argument values.
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
431 command! -addr=lines DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
432 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
433 \ .. "\n DoCmd 0 . :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
434 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
435 command! -addr=arguments DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
436 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
437 \ .. "\n DoCmd 0 . arg :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
438 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
439 command! -addr=buffers DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
440 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
441 \ .. "\n DoCmd 0 . buf :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
442 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
443 command! -addr=loaded_buffers DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
444 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
445 \ .. "\n DoCmd 0 . load :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
446 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
447 command! -addr=windows DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
448 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
449 \ .. "\n DoCmd 0 . win :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
450 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
451 command! -addr=tabs DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
452 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
453 \ .. "\n DoCmd 0 . tab :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
454 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
455 command! -addr=other DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
456 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
457 \ .. "\n DoCmd 0 . ? :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
458 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
459
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
460 " Test with various -complete= argument values (non-exhaustive list)
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
461 command! -complete=arglist DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
462 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
463 \ .. "\n DoCmd 0 arglist :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
464 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
465 command! -complete=augroup DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
466 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
467 \ .. "\n DoCmd 0 augroup :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
468 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
469 command! -complete=custom,CustomComplete DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
470 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
471 \ .. "\n DoCmd 0 custom :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
472 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
473 command! -complete=customlist,CustomComplete DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
474 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
475 \ .. "\n DoCmd 0 customlist :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
476 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
477
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
478 " Test with various -narg= argument values.
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
479 command! -nargs=0 DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
480 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
481 \ .. "\n DoCmd 0 :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
482 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
483 command! -nargs=1 DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
484 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
485 \ .. "\n DoCmd 1 :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
486 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
487 command! -nargs=* DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
488 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
489 \ .. "\n DoCmd * :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
490 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
491 command! -nargs=? DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
492 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
493 \ .. "\n DoCmd ? :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
494 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
495 command! -nargs=+ DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
496 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
497 \ .. "\n DoCmd + :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
498 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
499
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
500 " Test with other arguments.
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
501 command! -bang DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
502 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
503 \ .. "\n! DoCmd 0 :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
504 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
505 command! -bar DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
506 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
507 \ .. "\n| DoCmd 0 :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
508 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
509 command! -register DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
510 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
511 \ .. "\n\" DoCmd 0 :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
512 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
513 command! -buffer DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
514 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
515 \ .. "\nb DoCmd 0 :"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
516 \ .. "\n\" DoCmd 0 :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
517 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
518 comclear
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
519
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
520 " Test with many args.
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
521 command! -bang -bar -register -buffer -nargs=+ -complete=environment -addr=windows -count=3 DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
522 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
523 \ .. "\n!\"b|DoCmd + 3c win environment :",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
524 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
525 comclear
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
526
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
527 " Test with special characters in command definition.
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
528 command! DoCmd :<cr><tab><c-d>
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
529 call assert_equal("\n Name Args Address Complete Definition"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
530 \ .. "\n DoCmd 0 :<CR><Tab><C-D>",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
531 \ execute('command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
532
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
533 " Test output in verbose mode.
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
534 command! DoCmd :
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
535 call assert_match("^\n"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
536 \ .. " Name Args Address Complete Definition\n"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
537 \ .. " DoCmd 0 :\n"
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
538 \ .. "\tLast set from .*/test_usercommands.vim line \\d\\+$",
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
539 \ execute('verbose command DoCmd'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
540
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
541 comclear
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
542 call assert_equal("\nNo user-defined commands found", execute(':command Xxx'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
543 call assert_equal("\nNo user-defined commands found", execute('command'))
250420b35b10 patch 8.1.1206: user command parsing and listing not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 15125
diff changeset
544 endfunc