Bram Moolenaar | 15993ce | 2017-10-26 20:21:44 +0200 | [diff] [blame] | 1 | |
| 2 | " Test for insert expansion |
| 3 | func Test_ins_complete() |
Bram Moolenaar | cf1ba35 | 2017-10-27 00:55:04 +0200 | [diff] [blame] | 4 | edit test_ins_complete.vim |
Bram Moolenaar | fb094e1 | 2017-11-05 20:59:28 +0100 | [diff] [blame] | 5 | " The files in the current directory interferes with the files |
| 6 | " used by this test. So use a separate directory for the test. |
| 7 | call mkdir('Xdir') |
| 8 | cd Xdir |
| 9 | |
Bram Moolenaar | 15993ce | 2017-10-26 20:21:44 +0200 | [diff] [blame] | 10 | set ff=unix |
| 11 | call writefile(["test11\t36Gepeto\t/Tag/", |
| 12 | \ "asd\ttest11file\t36G", |
| 13 | \ "Makefile\tto\trun"], 'Xtestfile') |
| 14 | call writefile(['', 'start of testfile', |
| 15 | \ 'ru', |
| 16 | \ 'run1', |
| 17 | \ 'run2', |
| 18 | \ 'STARTTEST', |
| 19 | \ 'ENDTEST', |
| 20 | \ 'end of testfile'], 'Xtestdata') |
| 21 | set ff& |
| 22 | |
| 23 | enew! |
| 24 | edit Xtestdata |
| 25 | new |
| 26 | call append(0, ['#include "Xtestfile"', '']) |
| 27 | call cursor(2, 1) |
| 28 | |
| 29 | set cot= |
| 30 | set cpt=.,w |
| 31 | " add-expands (word from next line) from other window |
| 32 | exe "normal iru\<C-N>\<C-N>\<C-X>\<C-N>\<Esc>\<C-A>" |
| 33 | call assert_equal('run1 run3', getline('.')) |
| 34 | " add-expands (current buffer first) |
| 35 | exe "normal o\<C-P>\<C-X>\<C-N>" |
| 36 | call assert_equal('run3 run3', getline('.')) |
| 37 | " Local expansion, ends in an empty line (unless it becomes a global |
| 38 | " expansion) |
| 39 | exe "normal o\<C-X>\<C-P>\<C-P>\<C-P>\<C-P>\<C-P>" |
| 40 | call assert_equal('', getline('.')) |
| 41 | " starts Local and switches to global add-expansion |
| 42 | exe "normal o\<C-X>\<C-P>\<C-P>\<C-X>\<C-X>\<C-N>\<C-X>\<C-N>\<C-N>" |
| 43 | call assert_equal('run1 run2', getline('.')) |
| 44 | |
| 45 | set cpt=.,w,i |
| 46 | " i-add-expands and switches to local |
| 47 | exe "normal OM\<C-N>\<C-X>\<C-N>\<C-X>\<C-N>\<C-X>\<C-X>\<C-X>\<C-P>" |
| 48 | call assert_equal("Makefile\tto\trun3", getline('.')) |
| 49 | " add-expands lines (it would end in an empty line if it didn't ignored |
| 50 | " itself) |
| 51 | exe "normal o\<C-X>\<C-L>\<C-X>\<C-L>\<C-P>\<C-P>" |
| 52 | call assert_equal("Makefile\tto\trun3", getline('.')) |
| 53 | call assert_equal("Makefile\tto\trun3", getline(line('.') - 1)) |
| 54 | |
| 55 | set cpt=kXtestfile |
| 56 | " checks k-expansion, and file expansion (use Xtest11 instead of test11, |
| 57 | " because TEST11.OUT may match first on DOS) |
| 58 | write Xtest11.one |
| 59 | write Xtest11.two |
| 60 | exe "normal o\<C-N>\<Esc>IX\<Esc>A\<C-X>\<C-F>\<C-N>" |
| 61 | call assert_equal('Xtest11.two', getline('.')) |
| 62 | |
| 63 | " use CTRL-X CTRL-F to complete Xtest11.one, remove it and then use CTRL-X |
| 64 | " CTRL-F again to verify this doesn't cause trouble. |
| 65 | exe "normal oXt\<C-X>\<C-F>\<BS>\<BS>\<BS>\<BS>\<BS>\<BS>\<BS>\<BS>\<C-X>\<C-F>" |
| 66 | call assert_equal('Xtest11.one', getline('.')) |
| 67 | normal ddk |
| 68 | |
| 69 | set cpt=w |
| 70 | " checks make_cyclic in other window |
| 71 | exe "normal oST\<C-N>\<C-P>\<C-P>\<C-P>\<C-P>" |
| 72 | call assert_equal('STARTTEST', getline('.')) |
| 73 | |
| 74 | set cpt=u nohid |
| 75 | " checks unloaded buffer expansion |
| 76 | only |
| 77 | exe "normal oEN\<C-N>" |
| 78 | call assert_equal('ENDTEST', getline('.')) |
| 79 | " checks adding mode abortion |
| 80 | exe "normal ounl\<C-N>\<C-X>\<C-X>\<C-P>" |
| 81 | call assert_equal('unless', getline('.')) |
| 82 | |
| 83 | set cpt=t,d def=^\\k* tags=Xtestfile notagbsearch |
| 84 | " tag expansion, define add-expansion interrupted |
| 85 | exe "normal o\<C-X>\<C-]>\<C-X>\<C-D>\<C-X>\<C-D>\<C-X>\<C-X>\<C-D>\<C-X>\<C-D>\<C-X>\<C-D>\<C-X>\<C-D>" |
| 86 | call assert_equal('test11file 36Gepeto /Tag/ asd', getline('.')) |
| 87 | " t-expansion |
| 88 | exe "normal oa\<C-N>\<Esc>" |
| 89 | call assert_equal('asd', getline('.')) |
| 90 | |
| 91 | %bw! |
| 92 | call delete('Xtestfile') |
| 93 | call delete('Xtest11.one') |
| 94 | call delete('Xtest11.two') |
| 95 | call delete('Xtestdata') |
| 96 | set cpt& cot& def& tags& tagbsearch& hidden& |
Bram Moolenaar | fb094e1 | 2017-11-05 20:59:28 +0100 | [diff] [blame] | 97 | cd .. |
| 98 | call delete('Xdir', 'rf') |
Bram Moolenaar | 15993ce | 2017-10-26 20:21:44 +0200 | [diff] [blame] | 99 | endfunc |
Bram Moolenaar | ffd99f7 | 2017-11-02 15:44:14 +0100 | [diff] [blame] | 100 | |
| 101 | func Test_omni_dash() |
| 102 | func Omni(findstart, base) |
| 103 | if a:findstart |
| 104 | return 5 |
| 105 | else |
| 106 | echom a:base |
| 107 | return ['-help', '-v'] |
| 108 | endif |
| 109 | endfunc |
| 110 | set omnifunc=Omni |
| 111 | new |
| 112 | exe "normal Gofind -\<C-x>\<C-o>" |
| 113 | call assert_equal("\n-\nmatch 1 of 2", execute(':2mess')) |
| 114 | |
| 115 | bwipe! |
| 116 | delfunc Omni |
| 117 | set omnifunc= |
| 118 | endfunc |
Bram Moolenaar | 02ae9b4 | 2018-02-09 15:06:02 +0100 | [diff] [blame] | 119 | |
Bram Moolenaar | ffa9684 | 2018-06-12 22:05:14 +0200 | [diff] [blame] | 120 | func Test_completefunc_args() |
| 121 | let s:args = [] |
| 122 | func! CompleteFunc(findstart, base) |
| 123 | let s:args += [[a:findstart, empty(a:base)]] |
| 124 | endfunc |
| 125 | new |
| 126 | |
| 127 | set completefunc=CompleteFunc |
| 128 | call feedkeys("i\<C-X>\<C-U>\<Esc>", 'x') |
Bram Moolenaar | 52d3aae | 2018-06-13 21:27:24 +0200 | [diff] [blame] | 129 | call assert_equal([1, 1], s:args[0]) |
| 130 | call assert_equal(0, s:args[1][0]) |
Bram Moolenaar | ffa9684 | 2018-06-12 22:05:14 +0200 | [diff] [blame] | 131 | set completefunc= |
| 132 | |
| 133 | let s:args = [] |
| 134 | set omnifunc=CompleteFunc |
| 135 | call feedkeys("i\<C-X>\<C-O>\<Esc>", 'x') |
Bram Moolenaar | 52d3aae | 2018-06-13 21:27:24 +0200 | [diff] [blame] | 136 | call assert_equal([1, 1], s:args[0]) |
| 137 | call assert_equal(0, s:args[1][0]) |
Bram Moolenaar | ffa9684 | 2018-06-12 22:05:14 +0200 | [diff] [blame] | 138 | set omnifunc= |
| 139 | |
| 140 | bwipe! |
| 141 | unlet s:args |
| 142 | delfunc CompleteFunc |
| 143 | endfunc |
| 144 | |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 145 | func s:CompleteDone_CompleteFuncDict( findstart, base ) |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 146 | if a:findstart |
| 147 | return 0 |
| 148 | endif |
| 149 | |
| 150 | return { |
| 151 | \ 'words': [ |
| 152 | \ { |
| 153 | \ 'word': 'aword', |
| 154 | \ 'abbr': 'wrd', |
| 155 | \ 'menu': 'extra text', |
| 156 | \ 'info': 'words are cool', |
| 157 | \ 'kind': 'W', |
| 158 | \ 'user_data': 'test' |
| 159 | \ } |
| 160 | \ ] |
| 161 | \ } |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 162 | endfunc |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 163 | |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 164 | func s:CompleteDone_CheckCompletedItemDict() |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 165 | call assert_equal( 'aword', v:completed_item[ 'word' ] ) |
| 166 | call assert_equal( 'wrd', v:completed_item[ 'abbr' ] ) |
| 167 | call assert_equal( 'extra text', v:completed_item[ 'menu' ] ) |
| 168 | call assert_equal( 'words are cool', v:completed_item[ 'info' ] ) |
| 169 | call assert_equal( 'W', v:completed_item[ 'kind' ] ) |
| 170 | call assert_equal( 'test', v:completed_item[ 'user_data' ] ) |
| 171 | |
| 172 | let s:called_completedone = 1 |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 173 | endfunc |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 174 | |
| 175 | function Test_CompleteDoneDict() |
| 176 | au CompleteDone * :call <SID>CompleteDone_CheckCompletedItemDict() |
| 177 | |
| 178 | set completefunc=<SID>CompleteDone_CompleteFuncDict |
| 179 | execute "normal a\<C-X>\<C-U>\<C-Y>" |
| 180 | set completefunc& |
| 181 | |
| 182 | call assert_equal( 'test', v:completed_item[ 'user_data' ] ) |
| 183 | call assert_true( s:called_completedone ) |
| 184 | |
| 185 | let s:called_completedone = 0 |
| 186 | au! CompleteDone |
| 187 | endfunc |
| 188 | |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 189 | func s:CompleteDone_CompleteFuncDictNoUserData( findstart, base ) |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 190 | if a:findstart |
| 191 | return 0 |
| 192 | endif |
| 193 | |
| 194 | return { |
| 195 | \ 'words': [ |
| 196 | \ { |
| 197 | \ 'word': 'aword', |
| 198 | \ 'abbr': 'wrd', |
| 199 | \ 'menu': 'extra text', |
| 200 | \ 'info': 'words are cool', |
| 201 | \ 'kind': 'W' |
| 202 | \ } |
| 203 | \ ] |
| 204 | \ } |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 205 | endfunc |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 206 | |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 207 | func s:CompleteDone_CheckCompletedItemDictNoUserData() |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 208 | call assert_equal( 'aword', v:completed_item[ 'word' ] ) |
| 209 | call assert_equal( 'wrd', v:completed_item[ 'abbr' ] ) |
| 210 | call assert_equal( 'extra text', v:completed_item[ 'menu' ] ) |
| 211 | call assert_equal( 'words are cool', v:completed_item[ 'info' ] ) |
| 212 | call assert_equal( 'W', v:completed_item[ 'kind' ] ) |
| 213 | call assert_equal( '', v:completed_item[ 'user_data' ] ) |
| 214 | |
| 215 | let s:called_completedone = 1 |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 216 | endfunc |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 217 | |
| 218 | function Test_CompleteDoneDictNoUserData() |
| 219 | au CompleteDone * :call <SID>CompleteDone_CheckCompletedItemDictNoUserData() |
| 220 | |
| 221 | set completefunc=<SID>CompleteDone_CompleteFuncDictNoUserData |
| 222 | execute "normal a\<C-X>\<C-U>\<C-Y>" |
| 223 | set completefunc& |
| 224 | |
| 225 | call assert_equal( '', v:completed_item[ 'user_data' ] ) |
| 226 | call assert_true( s:called_completedone ) |
| 227 | |
| 228 | let s:called_completedone = 0 |
| 229 | au! CompleteDone |
| 230 | endfunc |
| 231 | |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 232 | func s:CompleteDone_CompleteFuncList( findstart, base ) |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 233 | if a:findstart |
| 234 | return 0 |
| 235 | endif |
| 236 | |
| 237 | return [ 'aword' ] |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 238 | endfunc |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 239 | |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 240 | func s:CompleteDone_CheckCompletedItemList() |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 241 | call assert_equal( 'aword', v:completed_item[ 'word' ] ) |
| 242 | call assert_equal( '', v:completed_item[ 'abbr' ] ) |
| 243 | call assert_equal( '', v:completed_item[ 'menu' ] ) |
| 244 | call assert_equal( '', v:completed_item[ 'info' ] ) |
| 245 | call assert_equal( '', v:completed_item[ 'kind' ] ) |
| 246 | call assert_equal( '', v:completed_item[ 'user_data' ] ) |
| 247 | |
| 248 | let s:called_completedone = 1 |
Bram Moolenaar | 1e11536 | 2019-01-09 23:01:02 +0100 | [diff] [blame^] | 249 | endfunc |
Bram Moolenaar | 9b56a57 | 2018-02-10 16:19:32 +0100 | [diff] [blame] | 250 | |
| 251 | function Test_CompleteDoneList() |
| 252 | au CompleteDone * :call <SID>CompleteDone_CheckCompletedItemList() |
| 253 | |
| 254 | set completefunc=<SID>CompleteDone_CompleteFuncList |
| 255 | execute "normal a\<C-X>\<C-U>\<C-Y>" |
| 256 | set completefunc& |
| 257 | |
| 258 | call assert_equal( '', v:completed_item[ 'user_data' ] ) |
| 259 | call assert_true( s:called_completedone ) |
| 260 | |
| 261 | let s:called_completedone = 0 |
| 262 | au! CompleteDone |
| 263 | endfunc |
| 264 | |
Bram Moolenaar | af559d2 | 2018-08-08 22:55:41 +0200 | [diff] [blame] | 265 | func Test_CompleteDone_undo() |
| 266 | au CompleteDone * call append(0, "prepend1") |
| 267 | new |
| 268 | call setline(1, ["line1", "line2"]) |
| 269 | call feedkeys("Go\<C-X>\<C-N>\<CR>\<ESC>", "tx") |
| 270 | call assert_equal(["prepend1", "line1", "line2", "line1", ""], |
| 271 | \ getline(1, '$')) |
| 272 | undo |
| 273 | call assert_equal(["line1", "line2"], getline(1, '$')) |
| 274 | bwipe! |
| 275 | au! CompleteDone |
| 276 | endfunc |
| 277 | |
Bram Moolenaar | 02ae9b4 | 2018-02-09 15:06:02 +0100 | [diff] [blame] | 278 | " Check that when using feedkeys() typeahead does not interrupt searching for |
| 279 | " completions. |
| 280 | func Test_compl_feedkeys() |
| 281 | new |
| 282 | set completeopt=menuone,noselect |
| 283 | call feedkeys("ajump ju\<C-X>\<C-N>\<C-P>\<ESC>", "tx") |
| 284 | call assert_equal("jump jump", getline(1)) |
| 285 | bwipe! |
| 286 | set completeopt& |
| 287 | endfunc |