Mercurial > vim

annotate src/testdir/test_tabpage.vim @ 14455:f713e016097d v8.1.0241

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.0241: effect of ":tabmove N" is not clear commit https://github.com/vim/vim/commit/7cc596547a582e7bc18d91312eb674906ebdc5c2 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Aug 7 13:14:46 2018 +0200 patch 8.1.0241: effect of ":tabmove N" is not clear Problem: Effect of ":tabmove N" is not clear. Solution: Add a test that shows the behavior. (Christian Brabandt, closes #3288)
author Christian Brabandt <cb@256bit.org>
date Tue, 07 Aug 2018 13:15:04 +0200
parents 29bad8212db3
children 060cb54565c1
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
13982
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
3
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
4 function Test_tabpage()
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5 bw!
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 " 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
7 tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8 call assert_equal(2, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 quit
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 " Open three tab pages and use ":tabdo"
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 0tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 1tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 $tabnew
10270
e5dddd764fef commit https://github.com/vim/vim/commit/3e8474dd50f64c998bb665ce852f584a58dede6b
Christian Brabandt <cb@256bit.org>
parents: 10136
diff changeset
15 %del
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 tabdo call append(line('$'), tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17 tabclose! 2
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 tabrewind
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
19 let line1 = getline('$')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20 undo
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21 q
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 tablast
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 let line2 = getline('$')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 q!
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25 call append(line('$'), line1)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 call append(line('$'), line2)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 unlet line1 line2
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 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
29 "
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 " 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
31 " 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
32 " are correctly set.
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
33 tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
34 tabfirst
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 call settabvar(2, 'val_num', 100)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
36 call settabvar(2, 'val_str', 'SetTabVar test')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
37 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
38 "
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
39 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
40
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
41 tabnext 2
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
42 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
43 tabclose
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
44
13268
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
45 " 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
46 sp test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
47 tab drop test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
48 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
49 close
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
50 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
51 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
52 " 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
53 split
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
54 tab drop newfile
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
55 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
56 tabclose
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
57 q
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
58 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
59 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
60 " Test for ":tab drop multi-opend-file" to keep current tabpage and window.
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
61 new test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
62 tabnew
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
63 new test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
64 tab drop test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
65 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
66 tabclose
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
67 q
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
68 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
69 "
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
70 " 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
71 tabedit test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
72 vnew
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
73 tabfirst
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
74 tab drop test1
50e1077e0c3d patch 8.0.1508: the :drop command is not always available
Christian Brabandt <cb@256bit.org>
parents: 12688
diff changeset
75 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
76 1tabonly
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
77 "
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
78 "
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
79 for i in range(9) | tabnew | endfor
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
80 normal! 1gt
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
81 call assert_equal(1, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
82 tabmove 5
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
83 call assert_equal(5, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
84 .tabmove
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
85 call assert_equal(5, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
86 tabmove -
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
87 call assert_equal(4, 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 -2
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
91 call assert_equal(3, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
92 tabmove +4
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
93 call assert_equal(7, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
94 tabmove
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
95 call assert_equal(10, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
96 0tabmove
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
97 call assert_equal(1, 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 tabmove 0
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 3tabmove
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
105 call assert_equal(4, tabpagenr())
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
106 7tabmove 5
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
107 call assert_equal(5, tabpagenr())
14455
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
108
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
109 " 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
110 norm! 2gt
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
111 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
112 tabmove 2
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
113 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
114 2tabmove
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
115 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
116 tabmove 1
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
117 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
118 1tabmove
f713e016097d patch 8.1.0241: effect of ":tabmove N" is not clear
Christian Brabandt <cb@256bit.org>
parents: 13982
diff changeset
119 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
120
10739
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
121 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
122 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
123 call assert_fails("-99tabmove", 'E16:')
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
124 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
125 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
126 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
127 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
128 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
129 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
130 1tabonly!
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
131 endfunc
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
132
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
133 " Test autocommands
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
134 function Test_tabpage_with_autocmd()
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
135 if !has('autocmd')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
136 return
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
137 endif
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
138 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
139 augroup TestTabpageGroup
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
140 au!
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
141 autocmd TabEnter * call add(s:li, 'TabEnter')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
142 autocmd WinEnter * call add(s:li, 'WinEnter')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
143 autocmd BufEnter * call add(s:li, 'BufEnter')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
144 autocmd TabLeave * call add(s:li, 'TabLeave')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
145 autocmd WinLeave * call add(s:li, 'WinLeave')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
146 autocmd BufLeave * call add(s:li, 'BufLeave')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
147 augroup END
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
148
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
149 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
150 let t:a='a'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
151 C tab split
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
152 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
153 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
154 let t:a='b'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
155 C tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
156 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
157 let t:a='c'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
158 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
159 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
160
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
161 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
162 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
163 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
164 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
165 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
166
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
167 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
168 let w:a='a'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
169 C vsplit
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
170 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
171 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
172 let w:a='a'
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
173 let tabn=tabpagenr()
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
174 let winr=range(1, winnr('$'))
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
175 C tabnext 1
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
176 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
177 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
178 call assert_equal(['a', 'a'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
179 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
180 C call map(copy(winr), 'settabwinvar('.tabn.', v:val, ''a'', v:val*2)')
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
181 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
182 call assert_equal(['2', '4'], s:li)
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
183
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
184 augroup TabDestructive
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
185 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
186 augroup END
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
187 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
188 C tabnext 3
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
189 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
190 call assert_equal(['2/2'], [tabpagenr().'/'.tabpagenr('$')])
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
191
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
192 autocmd! TabDestructive TabEnter
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
193 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
194 C tabnew
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
195 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
196 let s:li = []
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
197 C tabnext 1
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
198 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
199
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
200 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
201 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
202 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
203 C tabnext 2
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
204 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
205 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
206 call assert_equal(['2/2'], [tabpagenr().'/'.tabpagenr('$')])
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
207
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
208 delcommand C
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
209 autocmd! TabDestructive
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
210 augroup! TabDestructive
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
211 autocmd! TestTabpageGroup
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
212 augroup! TestTabpageGroup
10739
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
213 1tabonly!
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
214 endfunction
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
215
9927
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
216 function Test_tabpage_with_tab_modifier()
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
217 for n in range(4)
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
218 tabedit
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
219 endfor
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
220
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
221 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
222 exec 'tabnext ' . a:pre_nr
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
223 exec a:cmd
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
224 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
225 call assert_equal('help', &buftype)
9927
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
226 helpclose
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
227 endfunc
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
228
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
229 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
230 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
231 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
232 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
233 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
234 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
235 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
236 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
237 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
238 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
239 call assert_fails('99tab help', 'E16:')
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
240 call assert_fails('+99tab help', 'E16:')
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
241 call assert_fails('-99tab help', 'E16:')
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
242
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
243 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
244 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
245 endfunction
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
246
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
247 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
248 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
249 normal! G
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
250 exec a:cmd
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
251 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
252 endfunc
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
253
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
254 " 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
255 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
256 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
257 tabedit
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
258 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
259 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
260
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
261 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
262 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
263 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
264 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
265 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
266 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
267 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
268 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
269 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
270 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
271 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
272 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
273 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
274 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
275 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
276 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
277 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
278 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
279 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
280 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
281 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
282 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
283 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
284 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
285 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
286 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
287 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
288
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
289 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
290 endfunction
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
291
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
292 " 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
293 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
294 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
295 tabedit
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
296 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
297 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
298
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
299 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
300 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
301 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
302 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
303 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
304 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
305 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
306 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
307 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
308 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
309 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
310 else
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
311 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
312 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
313 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
314 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
315 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
316 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
317 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
318
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
319 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
320 endfunction
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
321
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
322 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
323 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
324 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
325 0tabedit n0
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
326 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
327 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
328 if n == 1
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
329 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
330 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
331 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
332 endfunc
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
333
13982
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
334 func Test_tabpage_ctrl_pgup_pgdown()
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
335 enew!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
336 tabnew tab1
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
337 tabnew tab2
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
338
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
339 call assert_equal(3, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
340 exe "norm! \<C-PageUp>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
341 call assert_equal(2, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
342 exe "norm! \<C-PageDown>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
343 call assert_equal(3, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
344
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
345 " Check wrapping at last or first page.
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
346 exe "norm! \<C-PageDown>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
347 call assert_equal(1, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
348 exe "norm! \<C-PageUp>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
349 call assert_equal(3, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
350
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
351 " 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
352 " - {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
353 " - {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
354 exe "norm! 2\<C-PageUp>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
355 call assert_equal(1, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
356 exe "norm! 2\<C-PageDown>"
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
357 call assert_equal(2, tabpagenr())
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
358
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
359 1tabonly!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
360 endfunc
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
361
10739
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
362 " 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
363 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
364
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
365 " pre count
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
366 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
367 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
368 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
369 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
370 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
371 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
372 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
373 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
374
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
375 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
376 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
377 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
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(3, '.-2tabclose', 2)
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(1, '.+1tabclose!', 1)
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
381 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
382 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
383
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
384 " post count
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
385 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
386 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
387 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
388 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
389 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
390 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
391 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
392 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
393
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
394 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
395 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
396 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
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(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
399 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
400 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
401 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
402
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
403 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
404 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
405 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
406 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
407 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
408 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
409 else
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
410 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
411 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
412 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
413 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
414 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
415 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
416 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
417
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
418 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
419 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
420 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
421 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
422 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
423
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
424 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
425 endfunction
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
426
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
427 " 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
428 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
429
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
430 " 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
431 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
432 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
433 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
434 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
435 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
436 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
437 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
438
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
439 " 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
440 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
441 \ [2, '', '!'],
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
442 \ [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
443 \ ]
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
444 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
445 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
446 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
447 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
448 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
449 else
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
450 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
451 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
452 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
453 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
454 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
455 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
456
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
457 " 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
458 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
459 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
460 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
461 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
462 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
463 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
464 else
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
465 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
466 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
467 endif
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
468 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
469 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
470 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
471 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
472
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
473 " 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
474 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
475 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
476 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
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 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
479 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
480 endfor
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
481
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
482 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
483 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
484 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
485
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
486 1tabonly!
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
487 new
380e706814da patch 8.0.0259: tab commands do not handle count correctly
Christian Brabandt <cb@256bit.org>
parents: 10432
diff changeset
488 only!
9927
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
489 endfunction
e1a8b2601fe0 commit https://github.com/vim/vim/commit/9b7f8ce9eb3cb704f8cc14ab659bf86b1d6dc13c
Christian Brabandt <cb@256bit.org>
parents: 9906
diff changeset
490
10082
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
491 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
492 " This once caused a crash
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
493 new
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
494 tabedit
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
495 tabfirst
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
496 au BufUnload <buffer> tabnext
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
497 q
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
498
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
499 while tabpagenr('$') > 1
10082
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
500 bwipe!
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
501 endwhile
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
502 endfunc
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
503
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
504 func Test_tabnext_on_buf_unload2()
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
505 " This once caused a crash
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
506 tabedit
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
507 autocmd BufUnload <buffer> tabnext
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
508 file x
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
509 edit y
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
510
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
511 while tabpagenr('$') > 1
7fc6103c6651 commit https://github.com/vim/vim/commit/5a49789a9b1f6447aeafbbbdd5b235dd10c471d5
Christian Brabandt <cb@256bit.org>
parents: 10076
diff changeset
512 bwipe!
10076
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
513 endwhile
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
514 endfunc
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
515
11635
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
516 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
517 " 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
518 edit Xtest
11635
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
519 new
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
520 only
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
521 set bufhidden=delete
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
522 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
523 tabnew tab1
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
524 tabnew tab2
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
525 1tabn
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
526 q!
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
527 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
528 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
529 " clean up
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
530 while tabpagenr('$') > 1
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
531 bwipe!
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
532 endwhile
12688
a6a935b3270e patch 8.0.1222: test functions interfere with each other
Christian Brabandt <cb@256bit.org>
parents: 11635
diff changeset
533 buf Xtest
11635
70bc7b107610 patch 8.0.0700: segfault with QuitPre autocommand closes the window
Christian Brabandt <cb@256bit.org>
parents: 10739
diff changeset
534 endfunc
10076
bc30991c3e98 commit https://github.com/vim/vim/commit/11fbc2866ccc11b4dd1726abdaf582a78ef3f743
Christian Brabandt <cb@256bit.org>
parents: 9927
diff changeset
535
13982
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
536 func Test_tabs()
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
537 enew!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
538 tabnew tab1
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
539 norm ixxx
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
540 let a=split(execute(':tabs'), "\n")
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
541 call assert_equal(['Tab page 1',
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
542 \ ' [No Name]',
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
543 \ 'Tab page 2',
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
544 \ '> + tab1'], a)
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
545
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
546 1tabonly!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
547 bw!
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
548 endfunc
29bad8212db3 patch 8.1.0009: tabpages insufficiently tested
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
549
9906
1ed0cab95f9a commit https://github.com/vim/vim/commit/1381d791478ee77c8368b89a3d4954316bf839b5
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
550 " vim: shiftwidth=2 sts=2 expandtab