blob: 550655cb6e491fc2d64003533718251cf592f0fa [file] [log] [blame]
Bram Moolenaar4a137b42017-08-04 22:37:11 +02001" Tests for the :let command.
2
3func Test_let()
4 " Test to not autoload when assigning. It causes internal error.
5 set runtimepath+=./sautest
6 let Test104#numvar = function('tr')
7 call assert_equal("function('tr')", string(Test104#numvar))
8
9 let a = 1
10 let b = 2
11
12 let out = execute('let a b')
13 let s = "\na #1\nb #2"
14 call assert_equal(s, out)
15
16 let out = execute('let {0 == 1 ? "a" : "b"}')
17 let s = "\nb #2"
18 call assert_equal(s, out)
19
20 let out = execute('let {0 == 1 ? "a" : "b"} a')
21 let s = "\nb #2\na #1"
22 call assert_equal(s, out)
23
24 let out = execute('let a {0 == 1 ? "a" : "b"}')
25 let s = "\na #1\nb #2"
26 call assert_equal(s, out)
27endfunc
Bram Moolenaar31b81602019-02-10 22:14:27 +010028
29func s:set_arg1(a) abort
30 let a:a = 1
31endfunction
32
33func s:set_arg2(a) abort
34 let a:b = 1
35endfunction
36
37func s:set_arg3(a) abort
38 let b = a:
39 let b['a'] = 1
40endfunction
41
42func s:set_arg4(a) abort
43 let b = a:
44 let b['a'] = 1
45endfunction
46
47func s:set_arg5(a) abort
48 let b = a:
49 let b['a'][0] = 1
50endfunction
51
52func s:set_arg6(a) abort
53 let a:a[0] = 1
54endfunction
55
56func s:set_arg7(a) abort
57 call extend(a:, {'a': 1})
58endfunction
59
60func s:set_arg8(a) abort
61 call extend(a:, {'b': 1})
62endfunction
63
64func s:set_arg9(a) abort
65 let a:['b'] = 1
66endfunction
67
68func s:set_arg10(a) abort
69 let b = a:
70 call extend(b, {'a': 1})
71endfunction
72
73func s:set_arg11(a) abort
74 let b = a:
75 call extend(b, {'b': 1})
76endfunction
77
78func s:set_arg12(a) abort
79 let b = a:
80 let b['b'] = 1
81endfunction
82
83func Test_let_arg_fail()
84 call assert_fails('call s:set_arg1(1)', 'E46:')
85 call assert_fails('call s:set_arg2(1)', 'E461:')
86 call assert_fails('call s:set_arg3(1)', 'E46:')
87 call assert_fails('call s:set_arg4(1)', 'E46:')
88 call assert_fails('call s:set_arg5(1)', 'E46:')
89 call s:set_arg6([0])
90 call assert_fails('call s:set_arg7(1)', 'E742:')
91 call assert_fails('call s:set_arg8(1)', 'E742:')
92 call assert_fails('call s:set_arg9(1)', 'E461:')
93 call assert_fails('call s:set_arg10(1)', 'E742:')
94 call assert_fails('call s:set_arg11(1)', 'E742:')
95 call assert_fails('call s:set_arg12(1)', 'E461:')
96endfunction
97
98func s:set_varg1(...) abort
99 let a:000 = []
100endfunction
101
102func s:set_varg2(...) abort
103 let a:000[0] = 1
104endfunction
105
106func s:set_varg3(...) abort
107 let a:000 += [1]
108endfunction
109
110func s:set_varg4(...) abort
111 call add(a:000, 1)
112endfunction
113
114func s:set_varg5(...) abort
115 let a:000[0][0] = 1
116endfunction
117
118func s:set_varg6(...) abort
119 let b = a:000
120 let b[0] = 1
121endfunction
122
123func s:set_varg7(...) abort
124 let b = a:000
125 let b += [1]
126endfunction
127
128func s:set_varg8(...) abort
129 let b = a:000
130 call add(b, 1)
131endfunction
132
133func s:set_varg9(...) abort
134 let b = a:000
135 let b[0][0] = 1
136endfunction
137
138func Test_let_varg_fail()
139 call assert_fails('call s:set_varg1(1)', 'E46:')
140 call assert_fails('call s:set_varg2(1)', 'E742:')
141 call assert_fails('call s:set_varg3(1)', 'E46:')
142 call assert_fails('call s:set_varg4(1)', 'E742:')
143 call s:set_varg5([0])
144 call assert_fails('call s:set_varg6(1)', 'E742:')
145 " call assert_fails('call s:set_varg7(1)', 'E46:')
146 call assert_fails('call s:set_varg8(1)', 'E742:')
147 call s:set_varg9([0])
148endfunction