Mercurial > vim
comparison src/testdir/vim9.vim @ 24450:3e1886f1e875 v8.2.2765
patch 8.2.2765: Vim9: not all blob operations work
Commit: https://github.com/vim/vim/commit/0e3ff1919603ee4c4a347fdf761dbdbdeb068015
Author: Bram Moolenaar <Bram@vim.org>
Date: Wed Apr 14 20:35:23 2021 +0200
patch 8.2.2765: Vim9: not all blob operations work
Problem: Vim9: not all blob operations work.
Solution: Run more tests also with Vim9 script and :def functions. Fix what
doesn't work.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Wed, 14 Apr 2021 20:45:04 +0200 |
parents | 602e528a8e43 |
children | e321dbddc076 |
comparison
equal
deleted
inserted
replaced
24449:ca0d84e008e5 | 24450:3e1886f1e875 |
---|---|
142 let s:sequence += 1 | 142 let s:sequence += 1 |
143 call writefile(['func Func()'] + a:lines + ['endfunc'], fname) | 143 call writefile(['func Func()'] + a:lines + ['endfunc'], fname) |
144 try | 144 try |
145 exe 'so ' .. fname | 145 exe 'so ' .. fname |
146 call Func() | 146 call Func() |
147 delfunc! Func | 147 finally |
148 finally | 148 delfunc! Func |
149 call chdir(cwd) | |
150 call delete(fname) | |
151 endtry | |
152 endfunc | |
153 | |
154 " Check that "lines" inside a legacy function results in the expected error | |
155 func CheckLegacyFailure(lines, error) | |
156 let cwd = getcwd() | |
157 let fname = 'XlegacyFails' .. s:sequence | |
158 let s:sequence += 1 | |
159 call writefile(['func Func()'] + a:lines + ['endfunc', 'call Func()'], fname) | |
160 try | |
161 call assert_fails('so ' .. fname, a:error) | |
162 finally | |
163 delfunc! Func | |
149 call chdir(cwd) | 164 call chdir(cwd) |
150 call delete(fname) | 165 call delete(fname) |
151 endtry | 166 endtry |
152 endfunc | 167 endfunc |
153 | 168 |
166 v->substitute('\<VAR\>', 'var', 'g') | 181 v->substitute('\<VAR\>', 'var', 'g') |
167 ->substitute('\<LET ', '', 'g')) | 182 ->substitute('\<LET ', '', 'g')) |
168 CheckDefSuccess(vim9lines) | 183 CheckDefSuccess(vim9lines) |
169 CheckScriptSuccess(['vim9script'] + vim9lines) | 184 CheckScriptSuccess(['vim9script'] + vim9lines) |
170 enddef | 185 enddef |
186 | |
187 " Execute "lines" in a legacy function, :def function and Vim9 script. | |
188 " Use 'VAR' for a declaration. | |
189 " Use 'LET' for an assignment | |
190 " Use ' #"' for a comment | |
191 def CheckLegacyAndVim9Failure(lines: list<string>, error: any) | |
192 var legacyError: string | |
193 var defError: string | |
194 var scriptError: string | |
195 | |
196 if type(error) == type('string') | |
197 legacyError = error | |
198 defError = error | |
199 scriptError = error | |
200 else | |
201 legacyError = error[0] | |
202 defError = error[1] | |
203 scriptError = error[2] | |
204 endif | |
205 | |
206 var legacylines = lines->mapnew((_, v) => | |
207 v->substitute('\<VAR\>', 'let', 'g') | |
208 ->substitute('\<LET\>', 'let', 'g') | |
209 ->substitute('#"', ' "', 'g')) | |
210 CheckLegacyFailure(legacylines, legacyError) | |
211 | |
212 var vim9lines = lines->mapnew((_, v) => | |
213 v->substitute('\<VAR\>', 'var', 'g') | |
214 ->substitute('\<LET ', '', 'g')) | |
215 CheckDefExecFailure(vim9lines, defError) | |
216 CheckScriptFailure(['vim9script'] + vim9lines, scriptError) | |
217 enddef |