Mercurial > vim

annotate src/testdir/test_tabpage.vim @ 18767:068337e86133 v8.1.2373

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.2373: cannot build with +popupwin but without +quickfix Commit: https://github.com/vim/vim/commit/5a4c3082d7ab51b3d448a91578479c96c1ab0ad3 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Dec 1 15:23:11 2019 +0100 patch 8.1.2373: cannot build with +popupwin but without +quickfix Problem: Cannot build with +popupwin but without +quickfix. (John Marriott) Solution: Adjust #ifdefs.
author Bram Moolenaar <Bram@vim.org>
date Sun, 01 Dec 2019 15:30:04 +0100
parents 7a19c8d6bb9e
children 0b337617877e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Tests for tabpage
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2
16477
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
3 source screendump.vim
18767
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix
Bram Moolenaar <Bram@vim.org>
parents: 18000
diff changeset
4 source check.vim
13982
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
5
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 function Test_tabpage()
18767
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix
Bram Moolenaar <Bram@vim.org>
parents: 18000
diff changeset
7 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix
Bram Moolenaar <Bram@vim.org>
parents: 18000
diff changeset
8
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 bw!
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 " Simple test for opening and closing a tab page
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 call assert_equal(2, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 quit
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
15 " Open three tab pages and use ":tabdo"
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 0tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17 1tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 $tabnew
10270
e5dddd764fef commit https://github.com/vim/vim/commit/3e8474dd50f64c998bb665ce852f584a58dede6b
Christian Brabandt <cb@256bit.org>
parents: 10136
diff changeset
19 %del
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20 tabdo call append(line('$'), tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21 tabclose! 2
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 tabrewind
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 let line1 = getline('$')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 undo
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25 q
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 tablast
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 let line2 = getline('$')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 q!
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 call append(line('$'), line1)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 call append(line('$'), line2)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31 unlet line1 line2
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
32 call assert_equal(['', '3', '1', '4'], getline(1, '$'))
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
33 "
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
34 " Test for settabvar() and gettabvar() functions. Open a new tab page and
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 " set 3 variables to a number, string and a list. Verify that the variables
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
36 " are correctly set.
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
37 tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
38 tabfirst
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
39 call settabvar(2, 'val_num', 100)
18000
7a19c8d6bb9e patch 8.1.1996: more functions can be used as methods
Bram Moolenaar <Bram@vim.org>
parents: 17918
diff changeset
40 eval 'SetTabVar test'->settabvar(2, 'val_str')
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
41 call settabvar(2, 'val_list', ['red', 'blue', 'green'])
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
42 "
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
43 call assert_true(gettabvar(2, 'val_num') == 100 && gettabvar(2, 'val_str') == 'SetTabVar test' && gettabvar(2, 'val_list') == ['red', 'blue', 'green'])
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
44
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
45 tabnext 2
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
46 call assert_true(t:val_num == 100 && t:val_str == 'SetTabVar test' && t:val_list == ['red', 'blue', 'green'])
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
47 tabclose
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
48
13268
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
49 " Test for ":tab drop exist-file" to keep current window.
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
50 sp test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
51 tab drop test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
52 call assert_true(tabpagenr('$') == 1 && winnr('$') == 2 && winnr() == 1)
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
53 close
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
54 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
55 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
56 " Test for ":tab drop new-file" to keep current window of tabpage 1.
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
57 split
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
58 tab drop newfile
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
59 call assert_true(tabpagenr('$') == 2 && tabpagewinnr(1, '$') == 2 && tabpagewinnr(1) == 1)
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
60 tabclose
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
61 q
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
62 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
63 "
17918
9606c0adc148 patch 8.1.1955: tests contain typos
Bram Moolenaar <Bram@vim.org>
parents: 16965
diff changeset
64 " Test for ":tab drop multi-opened-file" to keep current tabpage and window.
13268
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
65 new test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
66 tabnew
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
67 new test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
68 tab drop test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
69 call assert_true(tabpagenr() == 2 && tabpagewinnr(2, '$') == 2 && tabpagewinnr(2) == 1)
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
70 tabclose
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
71 q
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
72 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
73 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
74 " Test for ":tab drop vertical-split-window" to jump test1 buffer
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
75 tabedit test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
76 vnew
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
77 tabfirst
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
78 tab drop test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
79 call assert_equal([2, 2, 2, 2], [tabpagenr('$'), tabpagenr(), tabpagewinnr(2, '$'), tabpagewinnr(2)])
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
80 1tabonly
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
81 "
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
82 "
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
83 for i in range(9) | tabnew | endfor
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
84 normal! 1gt
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
85 call assert_equal(1, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
86 tabmove 5
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
87 call assert_equal(5, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
88 .tabmove
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
89 call assert_equal(5, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
90 tabmove -
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
91 call assert_equal(4, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
92 tabmove +
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
93 call assert_equal(5, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
94 tabmove -2
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
95 call assert_equal(3, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
96 tabmove +4
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
97 call assert_equal(7, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
98 tabmove
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
99 call assert_equal(10, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
100 0tabmove
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
101 call assert_equal(1, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
102 $tabmove
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
103 call assert_equal(10, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
104 tabmove 0
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
105 call assert_equal(1, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
106 tabmove $
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
107 call assert_equal(10, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
108 3tabmove
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
109 call assert_equal(4, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
110 7tabmove 5
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
111 call assert_equal(5, tabpagenr())
15573
060cb54565c1 patch 8.1.0794: white space before " -Ntabmove" causes problems
Bram Moolenaar <Bram@vim.org>
parents: 14455
diff changeset
112 -tabmove
060cb54565c1 patch 8.1.0794: white space before " -Ntabmove" causes problems
Bram Moolenaar <Bram@vim.org>
parents: 14455
diff changeset
113 call assert_equal(4, tabpagenr())
060cb54565c1 patch 8.1.0794: white space before " -Ntabmove" causes problems
Bram Moolenaar <Bram@vim.org>
parents: 14455
diff changeset
114 +tabmove
060cb54565c1 patch 8.1.0794: white space before " -Ntabmove" causes problems
Bram Moolenaar <Bram@vim.org>
parents: 14455
diff changeset
115 call assert_equal(5, tabpagenr())
060cb54565c1 patch 8.1.0794: white space before " -Ntabmove" causes problems
Bram Moolenaar <Bram@vim.org>
parents: 14455
diff changeset
116 -2tabmove
060cb54565c1 patch 8.1.0794: white space before " -Ntabmove" causes problems
Bram Moolenaar <Bram@vim.org>
parents: 14455
diff changeset
117 call assert_equal(3, tabpagenr())
060cb54565c1 patch 8.1.0794: white space before " -Ntabmove" causes problems
Bram Moolenaar <Bram@vim.org>
parents: 14455
diff changeset
118 +3tabmove
060cb54565c1 patch 8.1.0794: white space before " -Ntabmove" causes problems
Bram Moolenaar <Bram@vim.org>
parents: 14455
diff changeset
119 call assert_equal(6, tabpagenr())
14455
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
120
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
121 " The following are a no-op
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
122 norm! 2gt
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
123 call assert_equal(2, tabpagenr())
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
124 tabmove 2
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
125 call assert_equal(2, tabpagenr())
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
126 2tabmove
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
127 call assert_equal(2, tabpagenr())
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
128 tabmove 1
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
129 call assert_equal(2, tabpagenr())
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
130 1tabmove
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
131 call assert_equal(2, tabpagenr())
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
132
10739
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
133 call assert_fails("99tabmove", 'E16:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
134 call assert_fails("+99tabmove", 'E16:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
135 call assert_fails("-99tabmove", 'E16:')
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
136 call assert_fails("tabmove foo", 'E474:')
10739
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
137 call assert_fails("tabmove 99", 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
138 call assert_fails("tabmove +99", 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
139 call assert_fails("tabmove -99", 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
140 call assert_fails("tabmove -3+", 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
141 call assert_fails("tabmove $3", 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
142 1tabonly!
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
143 endfunc
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
144
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
145 " Test autocommands
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
146 function Test_tabpage_with_autocmd()
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
147 command -nargs=1 -bar C :call add(s:li, '=== ' . <q-args> . ' ===')|<args>
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
148 augroup TestTabpageGroup
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
149 au!
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
150 autocmd TabEnter * call add(s:li, 'TabEnter')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
151 autocmd WinEnter * call add(s:li, 'WinEnter')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
152 autocmd BufEnter * call add(s:li, 'BufEnter')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
153 autocmd TabLeave * call add(s:li, 'TabLeave')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
154 autocmd WinLeave * call add(s:li, 'WinLeave')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
155 autocmd BufLeave * call add(s:li, 'BufLeave')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
156 augroup END
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
157
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
158 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
159 let t:a='a'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
160 C tab split
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
161 call assert_equal(['=== tab split ===', 'WinLeave', 'TabLeave', 'WinEnter', 'TabEnter'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
162 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
163 let t:a='b'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
164 C tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
165 call assert_equal(['=== tabnew ===', 'WinLeave', 'TabLeave', 'WinEnter', 'TabEnter', 'BufLeave', 'BufEnter'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
166 let t:a='c'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
167 let s:li = split(join(map(range(1, tabpagenr('$')), 'gettabvar(v:val, "a")')) , '\s\+')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
168 call assert_equal(['a', 'b', 'c'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
169
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
170 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
171 C call map(range(1, tabpagenr('$')), 'settabvar(v:val, ''a'', v:val*2)')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
172 call assert_equal(["=== call map(range(1, tabpagenr('$')), 'settabvar(v:val, ''a'', v:val*2)') ==="], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
173 let s:li = split(join(map(range(1, tabpagenr('$')), 'gettabvar(v:val, "a")')) , '\s\+')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
174 call assert_equal(['2', '4', '6'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
175
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
176 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
177 let w:a='a'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
178 C vsplit
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
179 call assert_equal(['=== vsplit ===', 'WinLeave', 'WinEnter'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
180 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
181 let w:a='a'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
182 let tabn=tabpagenr()
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
183 let winr=range(1, winnr('$'))
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
184 C tabnext 1
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
185 call assert_equal(['=== tabnext 1 ===', 'BufLeave', 'WinLeave', 'TabLeave', 'WinEnter', 'TabEnter', 'BufEnter'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
186 let s:li = split(join(map(copy(winr), 'gettabwinvar('.tabn.', v:val, "a")')), '\s\+')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
187 call assert_equal(['a', 'a'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
188 let s:li = []
18000
7a19c8d6bb9e patch 8.1.1996: more functions can be used as methods
Bram Moolenaar <Bram@vim.org>
parents: 17918
diff changeset
189 C call map(copy(winr), '(v:val*2)->settabwinvar(' .. tabn .. ', v:val, ''a'')')
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
190 let s:li = split(join(map(copy(winr), 'gettabwinvar('.tabn.', v:val, "a")')), '\s\+')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
191 call assert_equal(['2', '4'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
192
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
193 augroup TabDestructive
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
194 autocmd TabEnter * :C tabnext 2 | C tabclose 3
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
195 augroup END
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
196 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
197 C tabnext 3
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
198 call assert_equal(['=== tabnext 3 ===', 'BufLeave', 'WinLeave', 'TabLeave', 'WinEnter', 'TabEnter', '=== tabnext 2 ===', '=== tabclose 3 ==='], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
199 call assert_equal(['2/2'], [tabpagenr().'/'.tabpagenr('$')])
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
200
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
201 autocmd! TabDestructive TabEnter
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
202 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
203 C tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
204 call assert_equal(['=== tabnew ===', 'WinLeave', 'TabLeave', 'WinEnter', 'TabEnter', 'BufLeave', 'BufEnter'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
205 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
206 C tabnext 1
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
207 call assert_equal(['=== tabnext 1 ===', 'BufLeave', 'WinLeave', 'TabLeave', 'WinEnter', 'TabEnter', 'BufEnter'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
208
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
209 autocmd TabDestructive TabEnter * nested :C tabnext 2 | C tabclose 3
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
210 let s:li = []
10739
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
211 call assert_equal(3, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
212 C tabnext 2
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
213 call assert_equal(2, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
214 call assert_equal(['=== tabnext 2 ===', 'WinLeave', 'TabLeave', 'WinEnter', 'TabEnter', '=== tabnext 2 ===', '=== tabclose 3 ==='], s:li)
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
215 call assert_equal(['2/2'], [tabpagenr().'/'.tabpagenr('$')])
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
216
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
217 delcommand C
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
218 autocmd! TabDestructive
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
219 augroup! TabDestructive
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
220 autocmd! TestTabpageGroup
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
221 augroup! TestTabpageGroup
10739
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
222 1tabonly!
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
223 endfunction
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
224
9927
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
225 function Test_tabpage_with_tab_modifier()
18767
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix
Bram Moolenaar <Bram@vim.org>
parents: 18000
diff changeset
226 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix
Bram Moolenaar <Bram@vim.org>
parents: 18000
diff changeset
227
9927
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
228 for n in range(4)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
229 tabedit
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
230 endfor
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
231
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
232 function s:check_tab(pre_nr, cmd, post_nr)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
233 exec 'tabnext ' . a:pre_nr
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
234 exec a:cmd
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
235 call assert_equal(a:post_nr, tabpagenr())
10136
13304dccb96e commit https://github.com/vim/vim/commit/100f5c90f4d4fb40bc3aeabc35192db371f5988f
Christian Brabandt <cb@256bit.org>
parents: 10082
diff changeset
236 call assert_equal('help', &buftype)
9927
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
237 helpclose
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
238 endfunc
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
239
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
240 call s:check_tab(1, 'tab help', 2)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
241 call s:check_tab(1, '3tab help', 4)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
242 call s:check_tab(1, '.tab help', 2)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
243 call s:check_tab(1, '.+1tab help', 3)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
244 call s:check_tab(1, '0tab help', 1)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
245 call s:check_tab(2, '+tab help', 4)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
246 call s:check_tab(2, '+2tab help', 5)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
247 call s:check_tab(4, '-tab help', 4)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
248 call s:check_tab(4, '-2tab help', 3)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
249 call s:check_tab(3, '$tab help', 6)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
250 call assert_fails('99tab help', 'E16:')
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
251 call assert_fails('+99tab help', 'E16:')
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
252 call assert_fails('-99tab help', 'E16:')
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
253
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
254 delfunction s:check_tab
10739
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
255 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
256 endfunction
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
257
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
258 function Check_tab_count(pre_nr, cmd, post_nr)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
259 exec 'tabnext' a:pre_nr
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
260 normal! G
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
261 exec a:cmd
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
262 call assert_equal(a:post_nr, tabpagenr(), a:cmd)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
263 endfunc
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
264
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
265 " Test for [count] of tabnext
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
266 function Test_tabpage_with_tabnext()
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
267 for n in range(4)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
268 tabedit
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
269 call setline(1, ['', '', '3'])
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
270 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
271
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
272 call Check_tab_count(1, 'tabnext', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
273 call Check_tab_count(1, '3tabnext', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
274 call Check_tab_count(1, '.tabnext', 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
275 call Check_tab_count(1, '.+1tabnext', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
276 call Check_tab_count(2, '+tabnext', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
277 call Check_tab_count(2, '+2tabnext', 4)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
278 call Check_tab_count(4, '-tabnext', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
279 call Check_tab_count(4, '-2tabnext', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
280 call Check_tab_count(3, '$tabnext', 5)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
281 call assert_fails('0tabnext', 'E16:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
282 call assert_fails('99tabnext', 'E16:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
283 call assert_fails('+99tabnext', 'E16:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
284 call assert_fails('-99tabnext', 'E16:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
285 call Check_tab_count(1, 'tabnext 3', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
286 call Check_tab_count(2, 'tabnext +', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
287 call Check_tab_count(2, 'tabnext +2', 4)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
288 call Check_tab_count(4, 'tabnext -', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
289 call Check_tab_count(4, 'tabnext -2', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
290 call Check_tab_count(3, 'tabnext $', 5)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
291 call assert_fails('tabnext 0', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
292 call assert_fails('tabnext .', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
293 call assert_fails('tabnext -+', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
294 call assert_fails('tabnext +2-', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
295 call assert_fails('tabnext $3', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
296 call assert_fails('tabnext 99', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
297 call assert_fails('tabnext +99', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
298 call assert_fails('tabnext -99', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
299
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
300 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
301 endfunction
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
302
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
303 " Test for [count] of tabprevious
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
304 function Test_tabpage_with_tabprevious()
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
305 for n in range(5)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
306 tabedit
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
307 call setline(1, ['', '', '3'])
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
308 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
309
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
310 for cmd in ['tabNext', 'tabprevious']
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
311 call Check_tab_count(6, cmd, 5)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
312 call Check_tab_count(6, '3' . cmd, 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
313 call Check_tab_count(6, '8' . cmd, 4)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
314 call Check_tab_count(6, cmd . ' 3', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
315 call Check_tab_count(6, cmd . ' 8', 4)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
316 for n in range(2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
317 for c in ['0', '.+3', '+', '+2' , '-', '-2' , '$', '+99', '-99']
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
318 if n == 0 " pre count
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
319 let entire_cmd = c . cmd
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
320 let err_code = 'E16:'
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
321 else
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
322 let entire_cmd = cmd . ' ' . c
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
323 let err_code = 'E474:'
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
324 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
325 call assert_fails(entire_cmd, err_code)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
326 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
327 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
328 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
329
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
330 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
331 endfunction
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
332
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
333 function s:reconstruct_tabpage_for_test(nr)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
334 let n = (a:nr > 2) ? a:nr - 2 : 1
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
335 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
336 0tabedit n0
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
337 for n in range(1, n)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
338 exec '$tabedit n' . n
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
339 if n == 1
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
340 call setline(1, ['', '', '3'])
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
341 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
342 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
343 endfunc
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
344
13982
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
345 func Test_tabpage_ctrl_pgup_pgdown()
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
346 enew!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
347 tabnew tab1
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
348 tabnew tab2
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
349
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
350 call assert_equal(3, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
351 exe "norm! \<C-PageUp>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
352 call assert_equal(2, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
353 exe "norm! \<C-PageDown>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
354 call assert_equal(3, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
355
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
356 " Check wrapping at last or first page.
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
357 exe "norm! \<C-PageDown>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
358 call assert_equal(1, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
359 exe "norm! \<C-PageUp>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
360 call assert_equal(3, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
361
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
362 " With a count, <C-PageUp> and <C-PageDown> are not symmetrical somehow:
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
363 " - {count}<C-PageUp> goes {count} pages downward (relative count)
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
364 " - {count}<C-PageDown> goes to page number {count} (absolute count)
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
365 exe "norm! 2\<C-PageUp>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
366 call assert_equal(1, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
367 exe "norm! 2\<C-PageDown>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
368 call assert_equal(2, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
369
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
370 1tabonly!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
371 endfunc
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
372
10739
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
373 " Test for [count] of tabclose
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
374 function Test_tabpage_with_tabclose()
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
375
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
376 " pre count
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
377 call s:reconstruct_tabpage_for_test(6)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
378 call Check_tab_count(3, 'tabclose!', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
379 call Check_tab_count(1, '3tabclose', 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
380 call Check_tab_count(4, '4tabclose', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
381 call Check_tab_count(3, '1tabclose', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
382 call Check_tab_count(2, 'tabclose', 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
383 call assert_equal(1, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
384 call assert_equal('', bufname(''))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
385
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
386 call s:reconstruct_tabpage_for_test(6)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
387 call Check_tab_count(2, '$tabclose', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
388 call Check_tab_count(4, '.tabclose', 4)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
389 call Check_tab_count(3, '.+tabclose', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
390 call Check_tab_count(3, '.-2tabclose', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
391 call Check_tab_count(1, '.+1tabclose!', 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
392 call assert_equal(1, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
393 call assert_equal('', bufname(''))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
394
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
395 " post count
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
396 call s:reconstruct_tabpage_for_test(6)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
397 call Check_tab_count(3, 'tabclose!', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
398 call Check_tab_count(1, 'tabclose 3', 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
399 call Check_tab_count(4, 'tabclose 4', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
400 call Check_tab_count(3, 'tabclose 1', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
401 call Check_tab_count(2, 'tabclose', 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
402 call assert_equal(1, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
403 call assert_equal('', bufname(''))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
404
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
405 call s:reconstruct_tabpage_for_test(6)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
406 call Check_tab_count(2, 'tabclose $', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
407 call Check_tab_count(4, 'tabclose', 4)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
408 call Check_tab_count(3, 'tabclose +', 3)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
409 call Check_tab_count(3, 'tabclose -2', 2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
410 call Check_tab_count(1, 'tabclose! +1', 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
411 call assert_equal(1, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
412 call assert_equal('', bufname(''))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
413
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
414 call s:reconstruct_tabpage_for_test(6)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
415 for n in range(2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
416 for c in ['0', '$3', '99', '+99', '-99']
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
417 if n == 0 " pre count
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
418 let entire_cmd = c . 'tabclose'
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
419 let err_code = 'E16:'
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
420 else
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
421 let entire_cmd = 'tabclose ' . c
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
422 let err_code = 'E474:'
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
423 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
424 call assert_fails(entire_cmd, err_code)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
425 call assert_equal(6, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
426 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
427 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
428
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
429 call assert_fails('3tabclose', 'E37:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
430 call assert_fails('tabclose 3', 'E37:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
431 call assert_fails('tabclose -+', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
432 call assert_fails('tabclose +2-', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
433 call assert_equal(6, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
434
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
435 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
436 endfunction
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
437
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
438 " Test for [count] of tabonly
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
439 function Test_tabpage_with_tabonly()
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
440
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
441 " Test for the normal behavior (pre count only)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
442 let tc = [ [4, '.', '!'], [2, '.+', ''], [3, '.-2', '!'], [1, '.+1', '!'] ]
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
443 for c in tc
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
444 call s:reconstruct_tabpage_for_test(6)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
445 let entire_cmd = c[1] . 'tabonly' . c[2]
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
446 call Check_tab_count(c[0], entire_cmd, 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
447 call assert_equal(1, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
448 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
449
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
450 " Test for the normal behavior
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
451 let tc2 = [ [3, '', ''], [1, '3', ''], [4, '4', '!'], [3, '1', '!'],
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
452 \ [2, '', '!'],
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
453 \ [2, '$', '!'], [3, '+', '!'], [3, '-2', '!'], [3, '+1', '!']
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
454 \ ]
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
455 for n in range(2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
456 for c in tc2
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
457 call s:reconstruct_tabpage_for_test(6)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
458 if n == 0 " pre count
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
459 let entire_cmd = c[1] . 'tabonly' . c[2]
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
460 else
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
461 let entire_cmd = 'tabonly' . c[2] . ' ' . c[1]
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
462 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
463 call Check_tab_count(c[0], entire_cmd, 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
464 call assert_equal(1, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
465 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
466 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
467
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
468 " Test for the error behavior
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
469 for n in range(2)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
470 for c in ['0', '$3', '99', '+99', '-99']
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
471 call s:reconstruct_tabpage_for_test(6)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
472 if n == 0 " pre count
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
473 let entire_cmd = c . 'tabonly'
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
474 let err_code = 'E16:'
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
475 else
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
476 let entire_cmd = 'tabonly ' . c
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
477 let err_code = 'E474:'
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
478 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
479 call assert_fails(entire_cmd, err_code)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
480 call assert_equal(6, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
481 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
482 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
483
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
484 " Test for the error behavior (post count only)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
485 for c in tc
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
486 call s:reconstruct_tabpage_for_test(6)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
487 let entire_cmd = 'tabonly' . c[2] . ' ' . c[1]
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
488 let err_code = 'E474:'
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
489 call assert_fails(entire_cmd, err_code)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
490 call assert_equal(6, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
491 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
492
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
493 call assert_fails('tabonly -+', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
494 call assert_fails('tabonly +2-', 'E474:')
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
495 call assert_equal(6, tabpagenr('$'))
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
496
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
497 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
498 new
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
499 only!
9927
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
500 endfunction
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
501
10082
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
502 func Test_tabnext_on_buf_unload1()
10076
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
503 " This once caused a crash
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
504 new
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
505 tabedit
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
506 tabfirst
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
507 au BufUnload <buffer> tabnext
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
508 q
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
509
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
510 while tabpagenr('$') > 1
10082
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
511 bwipe!
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
512 endwhile
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
513 endfunc
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
514
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
515 func Test_tabnext_on_buf_unload2()
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
516 " This once caused a crash
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
517 tabedit
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
518 autocmd BufUnload <buffer> tabnext
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
519 file x
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
520 edit y
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
521
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
522 while tabpagenr('$') > 1
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
523 bwipe!
10076
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
524 endwhile
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
525 endfunc
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
526
11635
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
527 func Test_close_on_quitpre()
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
528 " This once caused a crash
12688
a6a935b3270e patch 8.0.1222: test functions interfere with each other
Christian Brabandt <cb@256bit.org>
parents: 11635
diff changeset
529 edit Xtest
11635
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
530 new
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
531 only
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
532 set bufhidden=delete
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
533 au QuitPre <buffer> close
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
534 tabnew tab1
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
535 tabnew tab2
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
536 1tabn
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
537 q!
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
538 call assert_equal(1, tabpagenr())
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
539 call assert_equal(2, tabpagenr('$'))
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
540 " clean up
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
541 while tabpagenr('$') > 1
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
542 bwipe!
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
543 endwhile
12688
a6a935b3270e patch 8.0.1222: test functions interfere with each other
Christian Brabandt <cb@256bit.org>
parents: 11635
diff changeset
544 buf Xtest
11635
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
545 endfunc
10076
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
546
13982
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
547 func Test_tabs()
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
548 enew!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
549 tabnew tab1
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
550 norm ixxx
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
551 let a=split(execute(':tabs'), "\n")
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
552 call assert_equal(['Tab page 1',
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
553 \ ' [No Name]',
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
554 \ 'Tab page 2',
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
555 \ '> + tab1'], a)
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
556
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
557 1tabonly!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
558 bw!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
559 endfunc
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
560
16477
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
561 func Test_tabpage_cmdheight()
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
562 if !CanRunVimInTerminal()
16965
ba7727889385 patch 8.1.1483: skipped tests are not properly listed
Bram Moolenaar <Bram@vim.org>
parents: 16566
diff changeset
563 throw 'Skipped: cannot make screendumps'
16477
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
564 endif
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
565 call writefile([
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
566 \ 'set laststatus=2',
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
567 \ 'set cmdheight=2',
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
568 \ 'tabnew',
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
569 \ 'set cmdheight=3',
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
570 \ 'tabnext',
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
571 \ 'redraw!',
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
572 \ 'echo "hello\nthere"',
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
573 \ 'tabnext',
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
574 \ 'redraw',
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
575 \ ], 'XTest_tabpage_cmdheight')
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
576 " Check that cursor line is concealed
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
577 let buf = RunVimInTerminal('-S XTest_tabpage_cmdheight', {'statusoff': 3})
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
578 call VerifyScreenDump(buf, 'Test_tabpage_cmdheight', {})
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
579
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
580 call StopVimInTerminal(buf)
16566
72afc10bf322 patch 8.1.1286: running tests leaves XTest_tabpage_cmdheight file behind
Bram Moolenaar <Bram@vim.org>
parents: 16477
diff changeset
581 call delete('XTest_tabpage_cmdheight')
16477
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
582 endfunc
8cc31b1b1d23 patch 8.1.1242: no cmdline redraw when tabpages have different 'cmdheight'
Bram Moolenaar <Bram@vim.org>
parents: 16376
diff changeset
583
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
584 " vim: shiftwidth=2 sts=2 expandtab