vim: src/testdir/test_tagjump.vim annotate

annotate src/testdir/test_tagjump.vim @ 19783:546bdeef35f1 v8.2.0448

patch 8.2.0448: various functions not properly tested Commit: https://github.com/vim/vim/commit/0e05de46226eb4e5ea580beefa71831f92d613d3 Author: Bram Moolenaar <Bram@vim.org> Date: Wed Mar 25 22:23:46 2020 +0100 patch 8.2.0448: various functions not properly tested Problem: Various functions not properly tested. Solution: Add more tests, especially for failures. (Yegappan Lakshmanan, closes #5843)

author	Bram Moolenaar <Bram@vim.org>
date	Wed, 25 Mar 2020 22:30:04 +0100
parents	f70a3c1000bb
children	c087099e9163

rev	line source
8934 42c8599421e5 commit https://github.com/vim/vim/commit/8d8aa0a367380f23f0af428fcb66a1a0615bf872 Christian Brabandt <cb@256bit.org> parents: diff changeset	1 " Tests for tagjump (tags and special searches)
42c8599421e5 commit https://github.com/vim/vim/commit/8d8aa0a367380f23f0af428fcb66a1a0615bf872 Christian Brabandt <cb@256bit.org> parents: diff changeset	2
18293 1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	3 source check.vim
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	4 source screendump.vim
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	5
8934 42c8599421e5 commit https://github.com/vim/vim/commit/8d8aa0a367380f23f0af428fcb66a1a0615bf872 Christian Brabandt <cb@256bit.org> parents: diff changeset	6 " SEGV occurs in older versions. (At least 7.4.1748 or older)
42c8599421e5 commit https://github.com/vim/vim/commit/8d8aa0a367380f23f0af428fcb66a1a0615bf872 Christian Brabandt <cb@256bit.org> parents: diff changeset	7 func Test_ptag_with_notagstack()
18767 068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18640 diff changeset	8 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18640 diff changeset	9
8934 42c8599421e5 commit https://github.com/vim/vim/commit/8d8aa0a367380f23f0af428fcb66a1a0615bf872 Christian Brabandt <cb@256bit.org> parents: diff changeset	10 set notagstack
42c8599421e5 commit https://github.com/vim/vim/commit/8d8aa0a367380f23f0af428fcb66a1a0615bf872 Christian Brabandt <cb@256bit.org> parents: diff changeset	11 call assert_fails('ptag does_not_exist_tag_name', 'E426')
42c8599421e5 commit https://github.com/vim/vim/commit/8d8aa0a367380f23f0af428fcb66a1a0615bf872 Christian Brabandt <cb@256bit.org> parents: diff changeset	12 set tagstack&vim
42c8599421e5 commit https://github.com/vim/vim/commit/8d8aa0a367380f23f0af428fcb66a1a0615bf872 Christian Brabandt <cb@256bit.org> parents: diff changeset	13 endfunc
9228 ea504064c996 commit https://github.com/vim/vim/commit/fd89d7ea81b18d32363456b16258174dc9e095dc Christian Brabandt <cb@256bit.org> parents: 8934 diff changeset	14
9949 30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	15 func Test_cancel_ptjump()
18767 068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18640 diff changeset	16 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18640 diff changeset	17
9949 30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	18 set tags=Xtags
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	19 call writefile(["!_TAG_FILE_ENCODING\tutf-8\t//",
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	20 \ "word\tfile1\tcmd1",
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	21 \ "word\tfile2\tcmd2"],
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	22 \ 'Xtags')
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	23
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	24 only!
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	25 call feedkeys(":ptjump word\<CR>\<CR>", "xt")
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	26 help
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	27 call assert_equal(2, winnr('$'))
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	28
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	29 call delete('Xtags')
17093 5cda6165a5c1 patch 8.1.1546: in some tests 'tags' is set but not restored Bram Moolenaar <Bram@vim.org> parents: 16178 diff changeset	30 set tags&
9949 30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	31 quit
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	32 endfunc
30be4b26a37e commit https://github.com/vim/vim/commit/358308dd99abdd56c6540339e505585d8db7bdfe Christian Brabandt <cb@256bit.org> parents: 9909 diff changeset	33
10611 6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	34 func Test_static_tagjump()
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	35 set tags=Xtags
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	36 call writefile(["!_TAG_FILE_ENCODING\tutf-8\t//",
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	37 \ "one\tXfile1\t/^one/;\"\tf\tfile:\tsignature:(void)",
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	38 \ "word\tXfile2\tcmd2"],
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	39 \ 'Xtags')
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	40 new Xfile1
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	41 call setline(1, ['empty', 'one()', 'empty'])
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	42 write
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	43 tag one
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	44 call assert_equal(2, line('.'))
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	45
11008 0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	46 bwipe!
10611 6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	47 set tags&
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	48 call delete('Xtags')
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	49 call delete('Xfile1')
11008 0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	50 endfunc
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	51
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	52 func Test_duplicate_tagjump()
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	53 set tags=Xtags
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	54 call writefile(["!_TAG_FILE_ENCODING\tutf-8\t//",
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	55 \ "thesame\tXfile1\t1;\"\td\tfile:",
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	56 \ "thesame\tXfile1\t2;\"\td\tfile:",
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	57 \ "thesame\tXfile1\t3;\"\td\tfile:",
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	58 \ ],
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	59 \ 'Xtags')
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	60 new Xfile1
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	61 call setline(1, ['thesame one', 'thesame two', 'thesame three'])
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	62 write
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	63 tag thesame
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	64 call assert_equal(1, line('.'))
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	65 tnext
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	66 call assert_equal(2, line('.'))
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	67 tnext
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	68 call assert_equal(3, line('.'))
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	69
10611 6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	70 bwipe!
11008 0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	71 set tags&
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	72 call delete('Xtags')
0ecd07cd2e43 patch 8.0.0393: order of duplicate tags is not preserved Christian Brabandt <cb@256bit.org> parents: 10611 diff changeset	73 call delete('Xfile1')
10611 6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	74 endfunc
6bff81438f27 patch 8.0.0195: fail to jump to static tag in current file Christian Brabandt <cb@256bit.org> parents: 10145 diff changeset	75
11476 c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	76 func Test_tagjump_switchbuf()
18767 068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18640 diff changeset	77 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix Bram Moolenaar <Bram@vim.org> parents: 18640 diff changeset	78
11476 c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	79 set tags=Xtags
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	80 call writefile(["!_TAG_FILE_ENCODING\tutf-8\t//",
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	81 \ "second\tXfile1\t2",
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	82 \ "third\tXfile1\t3",],
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	83 \ 'Xtags')
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	84 call writefile(['first', 'second', 'third'], 'Xfile1')
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	85
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	86 enew \| only
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	87 set switchbuf=
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	88 stag second
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	89 call assert_equal(2, winnr('$'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	90 call assert_equal(2, line('.'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	91 stag third
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	92 call assert_equal(3, winnr('$'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	93 call assert_equal(3, line('.'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	94
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	95 enew \| only
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	96 set switchbuf=useopen
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	97 stag second
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	98 call assert_equal(2, winnr('$'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	99 call assert_equal(2, line('.'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	100 stag third
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	101 call assert_equal(2, winnr('$'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	102 call assert_equal(3, line('.'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	103
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	104 enew \| only
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	105 set switchbuf=usetab
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	106 tab stag second
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	107 call assert_equal(2, tabpagenr('$'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	108 call assert_equal(2, line('.'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	109 1tabnext \| stag third
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	110 call assert_equal(2, tabpagenr('$'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	111 call assert_equal(3, line('.'))
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	112
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	113 tabclose!
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	114 enew \| only
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	115 call delete('Xfile1')
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	116 call delete('Xtags')
17093 5cda6165a5c1 patch 8.1.1546: in some tests 'tags' is set but not restored Bram Moolenaar <Bram@vim.org> parents: 16178 diff changeset	117 set tags&
11476 c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	118 set switchbuf&vim
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	119 endfunc
c45fb081391c patch 8.0.0621: :stag does not respect 'switchbuf' Christian Brabandt <cb@256bit.org> parents: 11008 diff changeset	120
10145 eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	121 " Tests for [ CTRL-I and CTRL-W CTRL-I commands
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	122 function Test_keyword_jump()
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	123 call writefile(["#include Xinclude", "",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	124 \ "",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	125 \ "/* test text test tex start here",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	126 \ " some text",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	127 \ " test text",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	128 \ " start OK if found this line",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	129 \ " start found wrong line",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	130 \ "test text"], 'Xtestfile')
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	131 call writefile(["/* test text test tex start here",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	132 \ " some text",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	133 \ " test text",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	134 \ " start OK if found this line",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	135 \ " start found wrong line",
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	136 \ "test text"], 'Xinclude')
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	137 new Xtestfile
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	138 call cursor(1,1)
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	139 call search("start")
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	140 exe "normal! 5[\<C-I>"
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	141 call assert_equal(" start OK if found this line", getline('.'))
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	142 call cursor(1,1)
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	143 call search("start")
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	144 exe "normal! 5\<C-W>\<C-I>"
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	145 call assert_equal(" start OK if found this line", getline('.'))
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	146 enew! \| only
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	147 call delete('Xtestfile')
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	148 call delete('Xinclude')
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	149 endfunction
eb9a7296ae9f commit https://github.com/vim/vim/commit/53f1673cd909eb1c809c6a9086e3d104a0df9bed Christian Brabandt <cb@256bit.org> parents: 9949 diff changeset	150
12686 aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	151 " Test for jumping to a tag with 'hidden' set, with symbolic link in path of
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	152 " tag. This only works for Unix, because of the symbolic link.
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	153 func Test_tag_symbolic()
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	154 if !has('unix')
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	155 return
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	156 endif
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	157 set hidden
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	158 call delete("Xtest.dir", "rf")
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	159 call system("ln -s . Xtest.dir")
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	160 " Create a tags file with the current directory name inserted.
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	161 call writefile([
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	162 \ "SECTION_OFF " . getcwd() . "/Xtest.dir/Xtest.c /^#define SECTION_OFF 3$/",
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	163 \ '',
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	164 \ ], 'Xtags')
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	165 call writefile(['#define SECTION_OFF 3',
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	166 \ '#define NUM_SECTIONS 3'], 'Xtest.c')
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	167
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	168 " Try jumping to a tag, but with a path that contains a symbolic link. When
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	169 " wrong, this will give the ATTENTION message. The next space will then be
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	170 " eaten by hit-return, instead of moving the cursor to 'd'.
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	171 set tags=Xtags
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	172 enew!
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	173 call append(0, 'SECTION_OFF')
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	174 call cursor(1,1)
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	175 exe "normal \<C-]> "
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	176 call assert_equal('Xtest.c', expand('%:t'))
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	177 call assert_equal(2, col('.'))
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	178
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	179 set hidden&
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	180 set tags&
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	181 enew!
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	182 call delete('Xtags')
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	183 call delete('Xtest.c')
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	184 call delete("Xtest.dir", "rf")
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	185 %bwipe!
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	186 endfunc
aa658b33f25a patch 8.0.1221: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 11476 diff changeset	187
12750 0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	188 " Tests for tag search with !_TAG_FILE_ENCODING.
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	189 " Depends on the test83-tags2 and test83-tags3 files.
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	190 func Test_tag_file_encoding()
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	191 if has('vms')
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	192 return
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	193 endif
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	194
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	195 if !has('iconv') \|\| iconv("\x82\x60", "cp932", "utf-8") != "\uff21"
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	196 return
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	197 endif
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	198
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	199 let save_enc = &encoding
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	200 set encoding=utf8
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	201
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	202 let content = ['text for tags1', 'abcdefghijklmnopqrs']
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	203 call writefile(content, 'Xtags1.txt')
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	204 let content = ['text for tags2', 'ＡＢＣ']
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	205 call writefile(content, 'Xtags2.txt')
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	206 let content = ['text for tags3', 'ＡＢＣ']
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	207 call writefile(content, 'Xtags3.txt')
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	208 let content = ['!_TAG_FILE_ENCODING utf-8 //', 'abcdefghijklmnopqrs Xtags1.txt /abcdefghijklmnopqrs']
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	209 call writefile(content, 'Xtags1')
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	210
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	211 " case1:
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	212 new
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	213 set tags=Xtags1
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	214 tag abcdefghijklmnopqrs
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	215 call assert_equal('Xtags1.txt', expand('%:t'))
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	216 call assert_equal('abcdefghijklmnopqrs', getline('.'))
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	217 close
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	218
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	219 " case2:
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	220 new
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	221 set tags=test83-tags2
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	222 tag /.ＢＣ
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	223 call assert_equal('Xtags2.txt', expand('%:t'))
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	224 call assert_equal('ＡＢＣ', getline('.'))
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	225 close
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	226
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	227 " case3:
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	228 new
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	229 set tags=test83-tags3
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	230 tag abc50
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	231 call assert_equal('Xtags3.txt', expand('%:t'))
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	232 call assert_equal('ＡＢＣ', getline('.'))
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	233 close
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	234
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	235 set tags&
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	236 let &encoding = save_enc
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	237 call delete('Xtags1.txt')
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	238 call delete('Xtags2.txt')
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	239 call delete('Xtags3.txt')
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	240 call delete('Xtags1')
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	241 endfunc
0b6c09957b43 patch 8.0.1253: still too many old style tests Christian Brabandt <cb@256bit.org> parents: 12686 diff changeset	242
13227 b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	243 func Test_tagjump_etags()
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	244 if !has('emacs_tags')
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	245 return
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	246 endif
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	247 call writefile([
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	248 \ "void foo() {}",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	249 \ "int main(int argc, char **argv)",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	250 \ "{",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	251 \ "\tfoo();",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	252 \ "\treturn 0;",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	253 \ "}",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	254 \ ], 'Xmain.c')
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	255
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	256 call writefile([
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	257 \ "\x0c",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	258 \ "Xmain.c,64",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	259 \ "void foo() {}\x7ffoo\x011,0",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	260 \ "int main(int argc, char **argv)\x7fmain\x012,14",
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	261 \ ], 'Xtags')
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	262 set tags=Xtags
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	263 ta foo
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	264 call assert_equal('void foo() {}', getline('.'))
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	265
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	266 call delete('Xtags')
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	267 call delete('Xmain.c')
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	268 bwipe!
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	269 endfunc
b88fa651c824 patch 8.0.1488: emacs tags no longer work Christian Brabandt <cb@256bit.org> parents: 12750 diff changeset	270
15016 c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	271 " Test for getting and modifying the tag stack
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	272 func Test_getsettagstack()
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	273 call writefile(['line1', 'line2', 'line3'], 'Xfile1')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	274 call writefile(['line1', 'line2', 'line3'], 'Xfile2')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	275 call writefile(['line1', 'line2', 'line3'], 'Xfile3')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	276
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	277 enew \| only
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	278 call settagstack(1, {'items' : []})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	279 call assert_equal(0, gettagstack(1).length)
17912 9fac6d0de69a patch 8.1.1952: more functions can be used as a method Bram Moolenaar <Bram@vim.org> parents: 17093 diff changeset	280 call assert_equal([], 1->gettagstack().items)
15016 c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	281 " Error cases
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	282 call assert_equal({}, gettagstack(100))
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	283 call assert_equal(-1, settagstack(100, {'items' : []}))
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	284 call assert_fails('call settagstack(1, [1, 10])', 'E715')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	285 call assert_fails("call settagstack(1, {'items' : 10})", 'E714')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	286 call assert_fails("call settagstack(1, {'items' : []}, 10)", 'E928')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	287 call assert_fails("call settagstack(1, {'items' : []}, 'b')", 'E962')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	288
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	289 set tags=Xtags
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	290 call writefile(["!_TAG_FILE_ENCODING\tutf-8\t//",
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	291 \ "one\tXfile1\t1",
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	292 \ "three\tXfile3\t3",
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	293 \ "two\tXfile2\t2"],
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	294 \ 'Xtags')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	295
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	296 let stk = []
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	297 call add(stk, {'bufnr' : bufnr('%'), 'tagname' : 'one',
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	298 \ 'from' : [bufnr('%'), line('.'), col('.'), 0], 'matchnr' : 1})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	299 tag one
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	300 call add(stk, {'bufnr' : bufnr('%'), 'tagname' : 'two',
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	301 \ 'from' : [bufnr('%'), line('.'), col('.'), 0], 'matchnr' : 1})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	302 tag two
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	303 call add(stk, {'bufnr' : bufnr('%'), 'tagname' : 'three',
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	304 \ 'from' : [bufnr('%'), line('.'), col('.'), 0], 'matchnr' : 1})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	305 tag three
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	306 call assert_equal(3, gettagstack(1).length)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	307 call assert_equal(stk, gettagstack(1).items)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	308 " Check for default - current window
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	309 call assert_equal(3, gettagstack().length)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	310 call assert_equal(stk, gettagstack().items)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	311
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	312 " Try to set current index to invalid values
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	313 call settagstack(1, {'curidx' : -1})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	314 call assert_equal(1, gettagstack().curidx)
18000 7a19c8d6bb9e patch 8.1.1996: more functions can be used as methods Bram Moolenaar <Bram@vim.org> parents: 17912 diff changeset	315 eval {'curidx' : 50}->settagstack(1)
15016 c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	316 call assert_equal(4, gettagstack().curidx)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	317
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	318 " Try pushing invalid items onto the stack
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	319 call settagstack(1, {'items' : []})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	320 call settagstack(1, {'items' : ["plate"]}, 'a')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	321 call assert_equal(0, gettagstack().length)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	322 call assert_equal([], gettagstack().items)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	323 call settagstack(1, {'items' : [{"tagname" : "abc"}]}, 'a')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	324 call assert_equal(0, gettagstack().length)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	325 call assert_equal([], gettagstack().items)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	326 call settagstack(1, {'items' : [{"from" : 100}]}, 'a')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	327 call assert_equal(0, gettagstack().length)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	328 call assert_equal([], gettagstack().items)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	329 call settagstack(1, {'items' : [{"from" : [2, 1, 0, 0]}]}, 'a')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	330 call assert_equal(0, gettagstack().length)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	331 call assert_equal([], gettagstack().items)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	332
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	333 " Push one item at a time to the stack
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	334 call settagstack(1, {'items' : []})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	335 call settagstack(1, {'items' : [stk[0]]}, 'a')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	336 call settagstack(1, {'items' : [stk[1]]}, 'a')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	337 call settagstack(1, {'items' : [stk[2]]}, 'a')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	338 call settagstack(1, {'curidx' : 4})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	339 call assert_equal({'length' : 3, 'curidx' : 4, 'items' : stk},
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	340 \ gettagstack(1))
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	341
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	342 " Try pushing items onto a full stack
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	343 for i in range(7)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	344 call settagstack(1, {'items' : stk}, 'a')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	345 endfor
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	346 call assert_equal(20, gettagstack().length)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	347 call settagstack(1,
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	348 \ {'items' : [{'tagname' : 'abc', 'from' : [1, 10, 1, 0]}]}, 'a')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	349 call assert_equal('abc', gettagstack().items[19].tagname)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	350
19033 f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	351 " truncate the tag stack
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	352 call settagstack(1,
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	353 \ {'curidx' : 9,
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	354 \ 'items' : [{'tagname' : 'abc', 'from' : [1, 10, 1, 0]}]}, 't')
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	355 let t = gettagstack()
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	356 call assert_equal(9, t.length)
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	357 call assert_equal(10, t.curidx)
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	358
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	359 " truncate the tag stack without pushing any new items
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	360 call settagstack(1, {'curidx' : 5}, 't')
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	361 let t = gettagstack()
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	362 call assert_equal(4, t.length)
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	363 call assert_equal(5, t.curidx)
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	364
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	365 " truncate an empty tag stack and push new items
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	366 call settagstack(1, {'items' : []})
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	367 call settagstack(1,
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	368 \ {'items' : [{'tagname' : 'abc', 'from' : [1, 10, 1, 0]}]}, 't')
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	369 let t = gettagstack()
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	370 call assert_equal(1, t.length)
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	371 call assert_equal(2, t.curidx)
f0312cf3c792 patch 8.2.0077: settagstack() cannot truncate at current index Bram Moolenaar <Bram@vim.org> parents: 18767 diff changeset	372
15016 c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	373 " Tag with multiple matches
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	374 call writefile(["!_TAG_FILE_ENCODING\tutf-8\t//",
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	375 \ "two\tXfile1\t1",
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	376 \ "two\tXfile2\t3",
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	377 \ "two\tXfile3\t2"],
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	378 \ 'Xtags')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	379 call settagstack(1, {'items' : []})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	380 tag two
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	381 tnext
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	382 tnext
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	383 call assert_equal(1, gettagstack().length)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	384 call assert_equal(3, gettagstack().items[0].matchnr)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	385
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	386 " Memory allocation failures
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	387 call test_alloc_fail(GetAllocId('tagstack_items'), 0, 0)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	388 call assert_fails('call gettagstack()', 'E342:')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	389 call test_alloc_fail(GetAllocId('tagstack_from'), 0, 0)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	390 call assert_fails('call gettagstack()', 'E342:')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	391 call test_alloc_fail(GetAllocId('tagstack_details'), 0, 0)
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	392 call assert_fails('call gettagstack()', 'E342:')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	393
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	394 call settagstack(1, {'items' : []})
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	395 call delete('Xfile1')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	396 call delete('Xfile2')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	397 call delete('Xfile3')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	398 call delete('Xtags')
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	399 set tags&
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	400 endfunc
c338c91086b9 patch 8.1.0519: cannot save and restore the tag stack Bram Moolenaar <Bram@vim.org> parents: 13227 diff changeset	401
16164 213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	402 func Test_tag_with_count()
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	403 call writefile([
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	404 \ 'test Xtest.h /^void test();$/;" p typeref:typename:void signature:()',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	405 \ ], 'Xtags')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	406 call writefile([
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	407 \ 'main Xtest.c /^int main()$/;" f typeref:typename:int signature:()',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	408 \ 'test Xtest.c /^void test()$/;" f typeref:typename:void signature:()',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	409 \ ], 'Ytags')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	410 cal writefile([
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	411 \ 'int main()',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	412 \ 'void test()',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	413 \ ], 'Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	414 cal writefile([
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	415 \ 'void test();',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	416 \ ], 'Xtest.h')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	417 set tags=Xtags,Ytags
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	418
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	419 new Xtest.c
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	420 let tl = taglist('test', 'Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	421 call assert_equal(tl[0].filename, 'Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	422 call assert_equal(tl[1].filename, 'Xtest.h')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	423
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	424 tag test
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	425 call assert_equal(bufname('%'), 'Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	426 1tag test
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	427 call assert_equal(bufname('%'), 'Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	428 2tag test
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	429 call assert_equal(bufname('%'), 'Xtest.h')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	430
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	431 set tags&
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	432 call delete('Xtags')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	433 call delete('Ytags')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	434 bwipe Xtest.h
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	435 bwipe Xtest.c
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	436 call delete('Xtest.h')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	437 call delete('Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	438 endfunc
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	439
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	440 func Test_tagnr_recall()
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	441 call writefile([
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	442 \ 'test Xtest.h /^void test();$/;" p',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	443 \ 'main Xtest.c /^int main()$/;" f',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	444 \ 'test Xtest.c /^void test()$/;" f',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	445 \ ], 'Xtags')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	446 cal writefile([
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	447 \ 'int main()',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	448 \ 'void test()',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	449 \ ], 'Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	450 cal writefile([
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	451 \ 'void test();',
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	452 \ ], 'Xtest.h')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	453 set tags=Xtags
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	454
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	455 new Xtest.c
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	456 let tl = taglist('test', 'Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	457 call assert_equal(tl[0].filename, 'Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	458 call assert_equal(tl[1].filename, 'Xtest.h')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	459
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	460 2tag test
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	461 call assert_equal(bufname('%'), 'Xtest.h')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	462 pop
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	463 call assert_equal(bufname('%'), 'Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	464 tag
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	465 call assert_equal(bufname('%'), 'Xtest.h')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	466
17093 5cda6165a5c1 patch 8.1.1546: in some tests 'tags' is set but not restored Bram Moolenaar <Bram@vim.org> parents: 16178 diff changeset	467 set tags&
16164 213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	468 call delete('Xtags')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	469 bwipe Xtest.h
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	470 bwipe Xtest.c
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	471 call delete('Xtest.h')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	472 call delete('Xtest.c')
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	473 endfunc
213b88f89597 patch 8.1.1087: tag stack is incorrect after CTRL-T and then :tag Bram Moolenaar <Bram@vim.org> parents: 15016 diff changeset	474
16178 a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	475 func Test_tag_line_toolong()
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	476 call writefile([
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	477 \ '1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678 django/contrib/admin/templates/admin/edit_inline/stacked.html 16;" j line:16 language:HTML'
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	478 \ ], 'Xtags')
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	479 set tags=Xtags
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	480 let old_vbs = &verbose
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	481 set verbose=5
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	482 " ":tjump" should give "tag not found" not "Format error in tags file"
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	483 call assert_fails('tj /foo', 'E426')
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	484 try
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	485 tj /foo
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	486 catch /^Vim\%((\a\+)\)\=:E431/
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	487 call assert_report(v:exception)
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	488 catch /.*/
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	489 endtry
18550 90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	490 call assert_equal('Searching tags file Xtags', split(execute('messages'), '\n')[-1])
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	491
16178 a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	492 call writefile([
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	493 \ '123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567 django/contrib/admin/templates/admin/edit_inline/stacked.html 16;" j line:16 language:HTML'
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	494 \ ], 'Xtags')
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	495 call assert_fails('tj /foo', 'E426')
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	496 try
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	497 tj /foo
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	498 catch /^Vim\%((\a\+)\)\=:E431/
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	499 call assert_report(v:exception)
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	500 catch /.*/
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	501 endtry
18550 90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	502 call assert_equal('Searching tags file Xtags', split(execute('messages'), '\n')[-1])
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	503
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	504 " binary search works in file with long line
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	505 call writefile([
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	506 \ 'asdfasfd nowhere 16',
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	507 \ 'foobar Xsomewhere 3; " 12345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567',
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	508 \ 'zasdfasfd nowhere 16',
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	509 \ ], 'Xtags')
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	510 call writefile([
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	511 \ 'one',
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	512 \ 'two',
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	513 \ 'trhee',
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	514 \ 'four',
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	515 \ ], 'Xsomewhere')
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	516 tag foobar
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	517 call assert_equal('Xsomewhere', expand('%'))
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	518 call assert_equal(3, getcurpos()[1])
90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	519
16178 a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	520 call delete('Xtags')
18550 90e5812af76b patch 8.1.2269: tags file with very long line stops using binary search Bram Moolenaar <Bram@vim.org> parents: 18297 diff changeset	521 call delete('Xsomewhere')
17093 5cda6165a5c1 patch 8.1.1546: in some tests 'tags' is set but not restored Bram Moolenaar <Bram@vim.org> parents: 16178 diff changeset	522 set tags&
16178 a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	523 let &verbose = old_vbs
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	524 endfunc
a8689ea2e869 patch 8.1.1094: long line in tags file causes error Bram Moolenaar <Bram@vim.org> parents: 16164 diff changeset	525
18293 1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	526 " Check that using :tselect does not run into the hit-enter prompt.
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	527 " Requires a terminal to trigger that prompt.
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	528 func Test_tselect()
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	529 CheckScreendump
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	530
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	531 call writefile([
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	532 \ 'main Xtest.h /^void test();$/;" f',
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	533 \ 'main Xtest.c /^int main()$/;" f',
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	534 \ 'main Xtest.x /^void test()$/;" f',
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	535 \ ], 'Xtags')
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	536 cal writefile([
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	537 \ 'int main()',
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	538 \ 'void test()',
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	539 \ ], 'Xtest.c')
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	540
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	541 let lines =<< trim [SCRIPT]
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	542 set tags=Xtags
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	543 [SCRIPT]
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	544 call writefile(lines, 'XTest_tselect')
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	545 let buf = RunVimInTerminal('-S XTest_tselect', {'rows': 10, 'cols': 50})
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	546
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	547 call term_wait(buf, 100)
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	548 call term_sendkeys(buf, ":tselect main\<CR>2\<CR>")
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	549 call VerifyScreenDump(buf, 'Test_tselect_1', {})
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	550
18297 b0b37bd807ba patch 8.1.2143: cannot see each command even when 'verbose' is set Bram Moolenaar <Bram@vim.org> parents: 18293 diff changeset	551 call StopVimInTerminal(buf)
18293 1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	552 call delete('Xtags')
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	553 call delete('Xtest.c')
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	554 call delete('XTest_tselect')
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	555 endfunc
1c5974759bcd patch 8.1.2141: :tselect has an extra hit-enter prompt Bram Moolenaar <Bram@vim.org> parents: 18000 diff changeset	556
18640 b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	557 func Test_tagline()
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	558 call writefile([
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	559 \ 'provision Xtest.py /^ def provision(self, **kwargs):$/;" m line:1 language:Python class:Foo',
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	560 \ 'provision Xtest.py /^ def provision(self, **kwargs):$/;" m line:3 language:Python class:Bar',
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	561 \], 'Xtags')
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	562 call writefile([
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	563 \ ' def provision(self, **kwargs):',
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	564 \ ' pass',
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	565 \ ' def provision(self, **kwargs):',
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	566 \ ' pass',
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	567 \], 'Xtest.py')
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	568
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	569 set tags=Xtags
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	570
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	571 1tag provision
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	572 call assert_equal(line('.'), 1)
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	573 2tag provision
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	574 call assert_equal(line('.'), 3)
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	575
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	576 call delete('Xtags')
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	577 call delete('Xtest.py')
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	578 set tags&
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	579 endfunc
b9240fe40dd4 patch 8.1.2312: "line:" field in tags file not used Bram Moolenaar <Bram@vim.org> parents: 18550 diff changeset	580
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	581 " Test for expanding environment variable in a tag file name
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	582 func Test_tag_envvar()
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	583 call writefile(["Func1\t$FOO\t/^Func1/"], 'Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	584 set tags=Xtags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	585
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	586 let $FOO='TagTestEnv'
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	587
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	588 let caught_exception = v:false
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	589 try
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	590 tag Func1
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	591 catch /E429:/
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	592 call assert_match('E429:."TagTestEnv".', v:exception)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	593 let caught_exception = v:true
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	594 endtry
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	595 call assert_true(caught_exception)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	596
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	597 set tags&
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	598 call delete('Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	599 unlet $FOO
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	600 endfunc
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	601
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	602 " Test for :ptag
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	603 func Test_tag_preview()
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	604 call writefile(["!_TAG_FILE_ENCODING\tutf-8\t//",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	605 \ "second\tXfile1\t2",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	606 \ "third\tXfile1\t3",],
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	607 \ 'Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	608 set tags=Xtags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	609 call writefile(['first', 'second', 'third'], 'Xfile1')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	610
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	611 enew \| only
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	612 ptag third
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	613 call assert_equal(2, winnr())
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	614 call assert_equal(2, winnr('$'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	615 call assert_equal(1, getwinvar(1, '&previewwindow'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	616 call assert_equal(0, getwinvar(2, '&previewwindow'))
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	617 wincmd P
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	618 call assert_equal(3, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	619
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	620 " jump to the tag again
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	621 wincmd w
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	622 ptag third
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	623 wincmd P
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	624 call assert_equal(3, line('.'))
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	625
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	626 " jump to the newer tag
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	627 wincmd w
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	628 ptag
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	629 wincmd P
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	630 call assert_equal(3, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	631
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	632 " close the preview window
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	633 pclose
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	634 call assert_equal(1, winnr('$'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	635
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	636 call delete('Xfile1')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	637 call delete('Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	638 set tags&
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	639 endfunc
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	640
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	641 " Tests for guessing the tag location
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	642 func Test_tag_guess()
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	643 call writefile(["!_TAG_FILE_ENCODING\tutf-8\t//",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	644 \ "func1\tXfoo\t/^int func1(int x)/",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	645 \ "func2\tXfoo\t/^int func2(int y)/",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	646 \ "func3\tXfoo\t/^func3/",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	647 \ "func4\tXfoo\t/^func4/"],
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	648 \ 'Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	649 set tags=Xtags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	650 let code =<< trim [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	651
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	652 int FUNC1 (int x) { }
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	653 int
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	654 func2 (int y) { }
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	655 int * func3 () { }
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	656
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	657 [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	658 call writefile(code, 'Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	659
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	660 let v:statusmsg = ''
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	661 ta func1
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	662 call assert_match('E435:', v:statusmsg)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	663 call assert_equal(2, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	664 let v:statusmsg = ''
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	665 ta func2
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	666 call assert_match('E435:', v:statusmsg)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	667 call assert_equal(4, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	668 let v:statusmsg = ''
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	669 ta func3
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	670 call assert_match('E435:', v:statusmsg)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	671 call assert_equal(5, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	672 call assert_fails('ta func4', 'E434:')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	673
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	674 call delete('Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	675 call delete('Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	676 set tags&
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	677 endfunc
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	678
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	679 " Test for an unsorted tags file
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	680 func Test_tag_sort()
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	681 call writefile([
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	682 \ "first\tXfoo\t1",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	683 \ "ten\tXfoo\t3",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	684 \ "six\tXfoo\t2"],
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	685 \ 'Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	686 set tags=Xtags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	687 let code =<< trim [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	688 int first() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	689 int six() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	690 int ten() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	691 [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	692 call writefile(code, 'Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	693
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	694 call assert_fails('tag first', 'E432:')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	695
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	696 call delete('Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	697 call delete('Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	698 set tags&
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	699 %bwipe
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	700 endfunc
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	701
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	702 " Test for an unsorted tags file
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	703 func Test_tag_fold()
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	704 call writefile([
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	705 \ "!_TAG_FILE_ENCODING\tutf-8\t//",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	706 \ "!_TAG_FILE_SORTED\t2\t/0=unsorted, 1=sorted, 2=foldcase/",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	707 \ "first\tXfoo\t1",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	708 \ "second\tXfoo\t2",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	709 \ "third\tXfoo\t3"],
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	710 \ 'Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	711 set tags=Xtags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	712 let code =<< trim [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	713 int first() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	714 int second() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	715 int third() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	716 [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	717 call writefile(code, 'Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	718
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	719 enew
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	720 tag second
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	721 call assert_equal('Xfoo', bufname(''))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	722 call assert_equal(2, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	723
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	724 call delete('Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	725 call delete('Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	726 set tags&
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	727 %bwipe
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	728 endfunc
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	729
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	730 " Test for the :ltag command
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	731 func Test_ltag()
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	732 call writefile([
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	733 \ "!_TAG_FILE_ENCODING\tutf-8\t//",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	734 \ "first\tXfoo\t1",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	735 \ "second\tXfoo\t/^int second() {}$/",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	736 \ "third\tXfoo\t3"],
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	737 \ 'Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	738 set tags=Xtags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	739 let code =<< trim [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	740 int first() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	741 int second() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	742 int third() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	743 [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	744 call writefile(code, 'Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	745
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	746 enew
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	747 call setloclist(0, [], 'f')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	748 ltag third
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	749 call assert_equal('Xfoo', bufname(''))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	750 call assert_equal(3, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	751 call assert_equal([{'lnum': 3, 'bufnr': bufnr('Xfoo'), 'col': 0,
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	752 \ 'pattern': '', 'valid': 1, 'vcol': 0, 'nr': 0, 'type': '',
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	753 \ 'module': '', 'text': 'third'}], getloclist(0))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	754
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	755 ltag second
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	756 call assert_equal(2, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	757 call assert_equal([{'lnum': 0, 'bufnr': bufnr('Xfoo'), 'col': 0,
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	758 \ 'pattern': '^\Vint second() {}\$', 'valid': 1, 'vcol': 0, 'nr': 0,
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	759 \ 'type': '', 'module': '', 'text': 'second'}], getloclist(0))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	760
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	761 call delete('Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	762 call delete('Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	763 set tags&
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	764 %bwipe
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	765 endfunc
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	766
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	767 " Test for setting the last search pattern to the tag search pattern
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	768 " when cpoptions has 't'
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	769 func Test_tag_last_search_pat()
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	770 call writefile([
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	771 \ "!_TAG_FILE_ENCODING\tutf-8\t//",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	772 \ "first\tXfoo\t/^int first() {}/",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	773 \ "second\tXfoo\t/^int second() {}/",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	774 \ "third\tXfoo\t/^int third() {}/"],
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	775 \ 'Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	776 set tags=Xtags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	777 let code =<< trim [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	778 int first() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	779 int second() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	780 int third() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	781 [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	782 call writefile(code, 'Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	783
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	784 enew
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	785 let save_cpo = &cpo
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	786 set cpo+=t
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	787 let @/ = ''
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	788 tag second
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	789 call assert_equal('^int second() {}', @/)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	790 let &cpo = save_cpo
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	791
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	792 call delete('Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	793 call delete('Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	794 set tags&
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	795 %bwipe
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	796 endfunc
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	797
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	798 " Tag stack tests
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	799 func Test_tag_stack()
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	800 let l = []
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	801 for i in range(10, 31)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	802 let l += ["var" .. i .. "\tXfoo\t/^int var" .. i .. ";$/"]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	803 endfor
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	804 call writefile(l, 'Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	805 set tags=Xtags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	806
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	807 let l = []
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	808 for i in range(10, 31)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	809 let l += ["int var" .. i .. ";"]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	810 endfor
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	811 call writefile(l, 'Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	812
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	813 " Jump to a tag when the tag stack is full. Oldest entry should be removed.
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	814 enew
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	815 for i in range(10, 30)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	816 exe "tag var" .. i
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	817 endfor
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	818 let l = gettagstack()
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	819 call assert_equal(20, l.length)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	820 call assert_equal('var11', l.items[0].tagname)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	821 tag var31
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	822 let l = gettagstack()
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	823 call assert_equal('var12', l.items[0].tagname)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	824 call assert_equal('var31', l.items[19].tagname)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	825
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	826 " Use tnext with a single match
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	827 call assert_fails('tnext', 'E427:')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	828
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	829 " Jump to newest entry from the top of the stack
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	830 call assert_fails('tag', 'E556:')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	831
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	832 " Pop with zero count from the top of the stack
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	833 call assert_fails('0pop', 'E556:')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	834
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	835 " Pop from an unsaved buffer
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	836 enew!
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	837 call append(1, "sample text")
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	838 call assert_fails('pop', 'E37:')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	839 call assert_equal(21, gettagstack().curidx)
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	840 enew!
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	841
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	842 " Pop all the entries in the tag stack
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	843 call assert_fails('30pop', 'E555:')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	844
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	845 " Pop with a count when already at the bottom of the stack
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	846 call assert_fails('exe "normal 4\<C-T>"', 'E555:')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	847 call assert_equal(1, gettagstack().curidx)
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	848
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	849 " Jump to newest entry from the bottom of the stack with zero count
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	850 call assert_fails('0tag', 'E555:')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	851
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	852 " Pop the tag stack when it is empty
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	853 call settagstack(1, {'items' : []})
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	854 call assert_fails('pop', 'E73:')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	855
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	856 call delete('Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	857 call delete('Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	858 set tags&
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	859 %bwipe
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	860 endfunc
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	861
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	862 " Test for browsing multiple matching tags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	863 func Test_tag_multimatch()
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	864 call writefile([
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	865 \ "!_TAG_FILE_ENCODING\tutf-8\t//",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	866 \ "first\tXfoo\t1",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	867 \ "first\tXfoo\t2",
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	868 \ "first\tXfoo\t3"],
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	869 \ 'Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	870 set tags=Xtags
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	871 let code =<< trim [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	872 int first() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	873 int first() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	874 int first() {}
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	875 [CODE]
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	876 call writefile(code, 'Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	877
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	878 call settagstack(1, {'items' : []})
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	879 tag first
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	880 tlast
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	881 call assert_equal(3, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	882 call assert_fails('tnext', 'E428:')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	883 tfirst
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	884 call assert_equal(1, line('.'))
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	885 call assert_fails('tprev', 'E425:')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	886
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	887 tlast
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	888 call feedkeys("5\<CR>", 't')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	889 tselect first
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	890 call assert_equal(2, gettagstack().curidx)
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	891
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	892 set ignorecase
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	893 tag FIRST
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	894 tnext
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	895 call assert_equal(2, line('.'))
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	896 tlast
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	897 tprev
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	898 call assert_equal(2, line('.'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	899 tNext
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	900 call assert_equal(1, line('.'))
19063 fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	901 set ignorecase&
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	902
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	903 call delete('Xtags')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	904 call delete('Xfoo')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	905 set tags&
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	906 %bwipe
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	907 endfunc
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	908
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	909 " Test for previewing multiple matching tags
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	910 func Test_preview_tag_multimatch()
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	911 call writefile([
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	912 \ "!_TAG_FILE_ENCODING\tutf-8\t//",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	913 \ "first\tXfoo\t1",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	914 \ "first\tXfoo\t2",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	915 \ "first\tXfoo\t3"],
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	916 \ 'Xtags')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	917 set tags=Xtags
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	918 let code =<< trim [CODE]
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	919 int first() {}
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	920 int first() {}
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	921 int first() {}
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	922 [CODE]
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	923 call writefile(code, 'Xfoo')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	924
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	925 enew \| only
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	926 ptag first
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	927 ptlast
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	928 wincmd P
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	929 call assert_equal(3, line('.'))
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	930 wincmd w
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	931 call assert_fails('ptnext', 'E428:')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	932 ptprev
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	933 wincmd P
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	934 call assert_equal(2, line('.'))
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	935 wincmd w
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	936 ptfirst
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	937 wincmd P
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	938 call assert_equal(1, line('.'))
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	939 wincmd w
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	940 call assert_fails('ptprev', 'E425:')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	941 ptnext
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	942 wincmd P
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	943 call assert_equal(2, line('.'))
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	944 wincmd w
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	945 ptlast
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	946 call feedkeys("5\<CR>", 't')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	947 ptselect first
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	948 wincmd P
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	949 call assert_equal(3, line('.'))
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	950
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	951 pclose
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	952
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	953 call delete('Xtags')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	954 call delete('Xfoo')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	955 set tags&
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	956 %bwipe
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	957 endfunc
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	958
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	959 " Test for jumping to multiple matching tags across multiple :tags commands
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	960 func Test_tnext_multimatch()
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	961 call writefile([
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	962 \ "!_TAG_FILE_ENCODING\tutf-8\t//",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	963 \ "first\tXfoo1\t1",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	964 \ "first\tXfoo2\t1",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	965 \ "first\tXfoo3\t1"],
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	966 \ 'Xtags')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	967 set tags=Xtags
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	968 let code =<< trim [CODE]
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	969 int first() {}
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	970 [CODE]
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	971 call writefile(code, 'Xfoo1')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	972 call writefile(code, 'Xfoo2')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	973 call writefile(code, 'Xfoo3')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	974
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	975 tag first
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	976 tag first
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	977 pop
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	978 tnext
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	979 tnext
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	980 call assert_fails('tnext', 'E428:')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	981
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	982 call delete('Xtags')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	983 call delete('Xfoo1')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	984 call delete('Xfoo2')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	985 call delete('Xfoo3')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	986 set tags&
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	987 %bwipe
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	988 endfunc
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	989
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	990 " Test for jumping to multiple matching tags in non-existing files
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	991 func Test_multimatch_non_existing_files()
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	992 call writefile([
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	993 \ "!_TAG_FILE_ENCODING\tutf-8\t//",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	994 \ "first\tXfoo1\t1",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	995 \ "first\tXfoo2\t1",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	996 \ "first\tXfoo3\t1"],
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	997 \ 'Xtags')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	998 set tags=Xtags
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	999
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1000 call settagstack(1, {'items' : []})
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1001 call assert_fails('tag first', 'E429:')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1002 call assert_equal(3, gettagstack().items[0].matchnr)
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1003
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1004 call delete('Xtags')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1005 set tags&
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1006 %bwipe
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1007 endfunc
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1008
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1009 func Test_tselect_listing()
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1010 call writefile([
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1011 \ "!_TAG_FILE_ENCODING\tutf-8\t//",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1012 \ "first\tXfoo\t1" .. ';"' .. "\tv\ttyperef:typename:int\tfile:",
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1013 \ "first\tXfoo\t2" .. ';"' .. "\tv\ttyperef:typename:char\tfile:"],
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1014 \ 'Xtags')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1015 set tags=Xtags
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1016
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1017 let code =<< trim [CODE]
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1018 static int first;
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1019 static char first;
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1020 [CODE]
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1021 call writefile(code, 'Xfoo')
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1022
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1023 call feedkeys("\<CR>", "t")
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1024 let l = split(execute("tselect first"), "\n")
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1025 let expected =<< [DATA]
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1026 # pri kind tag file
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1027 1 FS v first Xfoo
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1028 typeref:typename:int
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1029 1
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1030 2 FS v first Xfoo
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1031 typeref:typename:char
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1032 2
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1033 Type number and <Enter> (empty cancels):
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1034 [DATA]
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1035 call assert_equal(expected, l)
fdc8deab9b4c patch 8.2.0092: tags functionality insufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19055 diff changeset	1036
19055 8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	1037 call delete('Xtags')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	1038 call delete('Xfoo')
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	1039 set tags&
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	1040 %bwipe
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	1041 endfunc
8645b73b3645 patch 8.2.0088: insufficient tests for tags; bug in using extra tag field Bram Moolenaar <Bram@vim.org> parents: 19033 diff changeset	1042
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1043 " Test for :isearch, :ilist, :ijump and :isplit commands
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1044 " Test for [i, ]i, [I, ]I, [ CTRL-I, ] CTRL-I and CTRL-W i commands
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1045 func Test_inc_search()
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1046 new
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1047 call setline(1, ['1:foo', '2:foo', 'foo', '3:foo', '4:foo'])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1048 call cursor(3, 1)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1049
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1050 " Test for [i and ]i
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1051 call assert_equal('1:foo', execute('normal [i'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1052 call assert_equal('2:foo', execute('normal 2[i'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1053 call assert_fails('normal 3[i', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1054 call assert_equal('3:foo', execute('normal ]i'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1055 call assert_equal('4:foo', execute('normal 2]i'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1056 call assert_fails('normal 3]i', 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1057
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1058 " Test for :isearch
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1059 call assert_equal('1:foo', execute('isearch foo'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1060 call assert_equal('3:foo', execute('isearch 4 /foo/'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1061 call assert_fails('isearch 3 foo', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1062 call assert_equal('3:foo', execute('+1,$isearch foo'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1063 call assert_fails('1,.-1isearch 3 foo', 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1064 call assert_fails('isearch bar', 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1065 call assert_fails('isearch /foo/3', 'E488:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1066
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1067 " Test for [I and ]I
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1068 call assert_equal([
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1069 \ ' 1: 1 1:foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1070 \ ' 2: 2 2:foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1071 \ ' 3: 3 foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1072 \ ' 4: 4 3:foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1073 \ ' 5: 5 4:foo'], split(execute('normal [I'), "\n"))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1074 call assert_equal([
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1075 \ ' 1: 4 3:foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1076 \ ' 2: 5 4:foo'], split(execute('normal ]I'), "\n"))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1077
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1078 " Test for :ilist
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1079 call assert_equal([
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1080 \ ' 1: 1 1:foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1081 \ ' 2: 2 2:foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1082 \ ' 3: 3 foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1083 \ ' 4: 4 3:foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1084 \ ' 5: 5 4:foo'], split(execute('ilist foo'), "\n"))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1085 call assert_equal([
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1086 \ ' 1: 4 3:foo',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1087 \ ' 2: 5 4:foo'], split(execute('+1,$ilist /foo/'), "\n"))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1088 call assert_fails('ilist bar', 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1089
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1090 " Test for [ CTRL-I and ] CTRL-I
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1091 exe "normal [\t"
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1092 call assert_equal([1, 3], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1093 exe "normal 2j4[\t"
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1094 call assert_equal([4, 3], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1095 call assert_fails("normal k3[\t", 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1096 call assert_fails("normal 6[\t", 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1097 exe "normal ]\t"
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1098 call assert_equal([4, 3], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1099 exe "normal k2]\t"
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1100 call assert_equal([5, 3], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1101 call assert_fails("normal 2k3]\t", 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1102
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1103 " Test for :ijump
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1104 call cursor(3, 1)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1105 ijump foo
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1106 call assert_equal([1, 3], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1107 call cursor(3, 1)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1108 ijump 4 /foo/
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1109 call assert_equal([4, 3], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1110 call cursor(3, 1)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1111 call assert_fails('ijump 3 foo', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1112 +,$ijump 2 foo
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1113 call assert_equal([5, 3], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1114 call assert_fails('ijump bar', 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1115
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1116 " Test for CTRL-W i
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1117 call cursor(3, 1)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1118 wincmd i
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1119 call assert_equal([1, 3, 3], [line('.'), col('.'), winnr('$')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1120 close
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1121 5wincmd i
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1122 call assert_equal([5, 3, 3], [line('.'), col('.'), winnr('$')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1123 close
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1124 call assert_fails('3wincmd i', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1125 call assert_fails('6wincmd i', 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1126
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1127 " Test for :isplit
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1128 isplit foo
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1129 call assert_equal([1, 3, 3], [line('.'), col('.'), winnr('$')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1130 close
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1131 isplit 5 /foo/
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1132 call assert_equal([5, 3, 3], [line('.'), col('.'), winnr('$')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1133 close
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1134 call assert_fails('isplit 3 foo', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1135 call assert_fails('isplit 6 foo', 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1136 call assert_fails('isplit bar', 'E389:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1137
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1138 close!
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1139 endfunc
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1140
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1141 " Test for :dsearch, :dlist, :djump and :dsplit commands
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1142 " Test for [d, ]d, [D, ]D, [ CTRL-D, ] CTRL-D and CTRL-W d commands
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1143 func Test_macro_search()
19425 67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1144 new
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1145 call setline(1, ['#define FOO 1', '#define FOO 2', '#define FOO 3',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1146 \ '#define FOO 4', '#define FOO 5'])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1147 call cursor(3, 9)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1148
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1149 " Test for [d and ]d
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1150 call assert_equal('#define FOO 1', execute('normal [d'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1151 call assert_equal('#define FOO 2', execute('normal 2[d'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1152 call assert_fails('normal 3[d', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1153 call assert_equal('#define FOO 4', execute('normal ]d'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1154 call assert_equal('#define FOO 5', execute('normal 2]d'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1155 call assert_fails('normal 3]d', 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1156
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1157 " Test for :dsearch
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1158 call assert_equal('#define FOO 1', execute('dsearch FOO'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1159 call assert_equal('#define FOO 5', execute('dsearch 5 /FOO/'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1160 call assert_fails('dsearch 3 FOO', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1161 call assert_equal('#define FOO 4', execute('+1,$dsearch FOO'))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1162 call assert_fails('1,.-1dsearch 3 FOO', 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1163 call assert_fails('dsearch BAR', 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1164
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1165 " Test for [D and ]D
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1166 call assert_equal([
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1167 \ ' 1: 1 #define FOO 1',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1168 \ ' 2: 2 #define FOO 2',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1169 \ ' 3: 3 #define FOO 3',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1170 \ ' 4: 4 #define FOO 4',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1171 \ ' 5: 5 #define FOO 5'], split(execute('normal [D'), "\n"))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1172 call assert_equal([
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1173 \ ' 1: 4 #define FOO 4',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1174 \ ' 2: 5 #define FOO 5'], split(execute('normal ]D'), "\n"))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1175
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1176 " Test for :dlist
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1177 call assert_equal([
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1178 \ ' 1: 1 #define FOO 1',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1179 \ ' 2: 2 #define FOO 2',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1180 \ ' 3: 3 #define FOO 3',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1181 \ ' 4: 4 #define FOO 4',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1182 \ ' 5: 5 #define FOO 5'], split(execute('dlist FOO'), "\n"))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1183 call assert_equal([
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1184 \ ' 1: 4 #define FOO 4',
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1185 \ ' 2: 5 #define FOO 5'], split(execute('+1,$dlist /FOO/'), "\n"))
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1186 call assert_fails('dlist BAR', 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1187
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1188 " Test for [ CTRL-D and ] CTRL-D
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1189 exe "normal [\<C-D>"
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1190 call assert_equal([1, 9], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1191 exe "normal 2j4[\<C-D>"
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1192 call assert_equal([4, 9], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1193 call assert_fails("normal k3[\<C-D>", 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1194 call assert_fails("normal 6[\<C-D>", 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1195 exe "normal ]\<C-D>"
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1196 call assert_equal([4, 9], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1197 exe "normal k2]\<C-D>"
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1198 call assert_equal([5, 9], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1199 call assert_fails("normal 2k3]\<C-D>", 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1200
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1201 " Test for :djump
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1202 call cursor(3, 9)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1203 djump FOO
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1204 call assert_equal([1, 9], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1205 call cursor(3, 9)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1206 djump 4 /FOO/
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1207 call assert_equal([4, 9], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1208 call cursor(3, 9)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1209 call assert_fails('djump 3 FOO', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1210 +,$djump 2 FOO
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1211 call assert_equal([5, 9], [line('.'), col('.')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1212 call assert_fails('djump BAR', 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1213
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1214 " Test for CTRL-W d
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1215 call cursor(3, 9)
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1216 wincmd d
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1217 call assert_equal([1, 9, 3], [line('.'), col('.'), winnr('$')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1218 close
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1219 5wincmd d
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1220 call assert_equal([5, 9, 3], [line('.'), col('.'), winnr('$')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1221 close
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1222 call assert_fails('3wincmd d', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1223 call assert_fails('6wincmd d', 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1224
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1225 " Test for :dsplit
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1226 dsplit FOO
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1227 call assert_equal([1, 9, 3], [line('.'), col('.'), winnr('$')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1228 close
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1229 dsplit 5 /FOO/
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1230 call assert_equal([5, 9, 3], [line('.'), col('.'), winnr('$')])
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1231 close
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1232 call assert_fails('dsplit 3 FOO', 'E387:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1233 call assert_fails('dsplit 6 FOO', 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1234 call assert_fails('dsplit BAR', 'E388:')
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1235
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1236 close!
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1237 endfunc
67fbe280a502 patch 8.2.0270: some code not covered by tests Bram Moolenaar <Bram@vim.org> parents: 19063 diff changeset	1238
19625 f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1239 " Test for [, [/, ] and ]/
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1240 func Test_comment_search()
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1241 new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1242 call setline(1, ['', '/', ' ', ' ', ' /'])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1243 normal! 4gg[/
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1244 call assert_equal([2, 1], [line('.'), col('.')])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1245 normal! 3gg[*
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1246 call assert_equal([2, 1], [line('.'), col('.')])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1247 normal! 3gg]/
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1248 call assert_equal([5, 3], [line('.'), col('.')])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1249 normal! 3gg]*
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1250 call assert_equal([5, 3], [line('.'), col('.')])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1251 %d
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1252 call setline(1, ['', '/', ' ', ' *'])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1253 call assert_beeps('normal! 3gg]/')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1254 %d
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1255 call setline(1, ['', ' ', ' ', ' */'])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1256 call assert_beeps('normal! 4gg[/')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1257 %d
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1258 call setline(1, ' /* comment */')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1259 normal! 15\|[/
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1260 call assert_equal(9, col('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1261 normal! 15\|]/
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1262 call assert_equal(21, col('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1263 call setline(1, ' comment */')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1264 call assert_beeps('normal! 15\|[/')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1265 call setline(1, ' /* comment')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1266 call assert_beeps('normal! 15\|]/')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1267 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1268 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested Bram Moolenaar <Bram@vim.org> parents: 19425 diff changeset	1269
9909 3ee84d270ea7 commit https://github.com/vim/vim/commit/9e4d8215d386100ab660d7d11e6620fd148b605e Christian Brabandt <cb@256bit.org> parents: 9228 diff changeset	1270 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_tagjump.vim @ 19783:546bdeef35f1 v8.2.0448