4157
|
1 Tests for getbufvar(), getwinvar(), gettabvar() and gettabwinvar().
|
|
2 vim: set ft=vim :
|
|
3
|
|
4 STARTTEST
|
|
5 :so small.vim
|
|
6 :"
|
4297
|
7 :" Test for getbufvar()
|
|
8 :" Use strings to test for memory leaks.
|
|
9 :let b:var_num = '1234'
|
|
10 :let def_num = '5678'
|
4157
|
11 :$put =string(getbufvar(1, 'var_num'))
|
|
12 :$put =string(getbufvar(1, 'var_num', def_num))
|
|
13 :$put =string(getbufvar(1, ''))
|
|
14 :$put =string(getbufvar(1, '', def_num))
|
|
15 :unlet b:var_num
|
|
16 :$put =string(getbufvar(1, 'var_num', def_num))
|
|
17 :$put =string(getbufvar(1, ''))
|
|
18 :$put =string(getbufvar(1, '', def_num))
|
|
19 :$put =string(getbufvar(9, ''))
|
|
20 :$put =string(getbufvar(9, '', def_num))
|
|
21 :unlet def_num
|
|
22 :$put =string(getbufvar(1, '&autoindent'))
|
|
23 :$put =string(getbufvar(1, '&autoindent', 1))
|
|
24 :"
|
|
25 :" test for getwinvar()
|
|
26 :let w:var_str = "Dance"
|
|
27 :let def_str = "Chance"
|
|
28 :$put =string(getwinvar(1, 'var_str'))
|
|
29 :$put =string(getwinvar(1, 'var_str', def_str))
|
|
30 :$put =string(getwinvar(1, ''))
|
|
31 :$put =string(getwinvar(1, '', def_str))
|
|
32 :unlet w:var_str
|
|
33 :$put =string(getwinvar(1, 'var_str', def_str))
|
|
34 :$put =string(getwinvar(1, ''))
|
|
35 :$put =string(getwinvar(1, '', def_str))
|
|
36 :$put =string(getwinvar(9, ''))
|
|
37 :$put =string(getwinvar(9, '', def_str))
|
|
38 :$put =string(getwinvar(1, '&nu'))
|
|
39 :$put =string(getwinvar(1, '&nu', 1))
|
|
40 :unlet def_str
|
|
41 :"
|
|
42 :" test for gettabvar()
|
|
43 :tabnew
|
|
44 :tabnew
|
|
45 :let t:var_list = [1, 2, 3]
|
|
46 :let def_list = [4, 5, 6, 7]
|
|
47 :tabrewind
|
|
48 :$put =string(gettabvar(3, 'var_list'))
|
|
49 :$put =string(gettabvar(3, 'var_list', def_list))
|
|
50 :$put =string(gettabvar(3, ''))
|
|
51 :$put =string(gettabvar(3, '', def_list))
|
|
52 :tablast
|
|
53 :unlet t:var_list
|
|
54 :tabrewind
|
|
55 :$put =string(gettabvar(3, 'var_list', def_list))
|
|
56 :$put =string(gettabvar(9, ''))
|
|
57 :$put =string(gettabvar(9, '', def_list))
|
|
58 :$put =string(gettabvar(3, '&nu'))
|
|
59 :$put =string(gettabvar(3, '&nu', def_list))
|
|
60 :unlet def_list
|
|
61 :tabonly
|
|
62 :"
|
|
63 :" test for gettabwinvar()
|
|
64 :tabnew
|
|
65 :tabnew
|
|
66 :tabprev
|
|
67 :split
|
|
68 :split
|
|
69 :wincmd w
|
|
70 :vert split
|
|
71 :wincmd w
|
|
72 :let w:var_dict = {'dict': 'tabwin'}
|
|
73 :let def_dict = {'dict2': 'newval'}
|
|
74 :wincmd b
|
|
75 :tabrewind
|
|
76 :$put =string(gettabwinvar(2, 3, 'var_dict'))
|
|
77 :$put =string(gettabwinvar(2, 3, 'var_dict', def_dict))
|
|
78 :$put =string(gettabwinvar(2, 3, ''))
|
|
79 :$put =string(gettabwinvar(2, 3, '', def_dict))
|
|
80 :tabnext
|
|
81 :3wincmd w
|
|
82 :unlet w:var_dict
|
|
83 :tabrewind
|
|
84 :$put =string(gettabwinvar(2, 3, 'var_dict', def_dict))
|
|
85 :$put =string(gettabwinvar(2, 3, ''))
|
|
86 :$put =string(gettabwinvar(2, 3, '', def_dict))
|
|
87 :$put =string(gettabwinvar(2, 9, ''))
|
|
88 :$put =string(gettabwinvar(2, 9, '', def_dict))
|
|
89 :$put =string(gettabwinvar(9, 3, ''))
|
|
90 :$put =string(gettabwinvar(9, 3, '', def_dict))
|
|
91 :unlet def_dict
|
|
92 :$put =string(gettabwinvar(2, 3, '&nux'))
|
|
93 :$put =string(gettabwinvar(2, 3, '&nux', 1))
|
|
94 :tabonly
|
|
95 :"
|
|
96 :/^start/,$wq! test.out
|
|
97 ENDTEST
|
|
98
|
|
99 start:
|