blob: 10670b002a477ef1b0b7b5b4077820f8e0de636f [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:')
Bram Moolenaar05c00c02019-02-11 22:00:11 +0100145 call assert_fails('call s:set_varg7(1)', 'E742:')
Bram Moolenaar31b81602019-02-10 22:14:27 +0100146 call assert_fails('call s:set_varg8(1)', 'E742:')
147 call s:set_varg9([0])
148endfunction
Bram Moolenaarf0908e62019-03-30 20:11:50 +0100149
150func Test_let_utf8_environment()
151 let $a = 'ĀĒĪŌŪあいうえお'
152 call assert_equal('ĀĒĪŌŪあいうえお', $a)
153endfunc
Bram Moolenaarf5842c52019-05-19 18:41:26 +0200154
155" Test for the setting a variable using the heredoc syntax
156func Test_let_heredoc()
157 let var1 =<< END
158Some sample text
159 Text with indent
160 !@#$%^&*()-+_={}|[]\~`:";'<>?,./
161END
162
163 call assert_equal(["Some sample text", "\tText with indent", " !@#$%^&*()-+_={}|[]\\~`:\";'<>?,./"], var1)
164
165 let var2 =<<
166Editor
167.
168 call assert_equal(['Editor'], var2)
169
170 let var3 =<<END
171END
172 call assert_equal([], var3)
173
174 let var3 =<<END
175vim
176
177end
178 END
179END
180END
181 call assert_equal(['vim', '', 'end', ' END', 'END '], var3)
182
183 let var1 =<< trim END
184 Line1
185 Line2
186 Line3
187 END
188 END
189 call assert_equal(['Line1', ' Line2', "\tLine3", ' END'], var1)
190
191 let var1 =<< trim
192 Line1
193 .
194 call assert_equal([' Line1'], var1)
195
196 call assert_fails('let v =<< marker', 'E991:')
197 call assert_fails('call WrongSyntax()', 'E488:')
198 call assert_fails('call MissingEnd()', 'E990:')
199endfunc
200
201func WrongSyntax()
202 let fail =<< that there
203endfunc
204
205func MissingEnd()
206 let fail =<< END
207endfunc