mirror of
https://github.com/neovim/neovim.git
synced 2024-12-20 11:15:14 -07:00
59c8a1fd51
Adds method call support for all functions in the patch, but it cannot
be fully ported due to missing tests for:
- index(): requires Blobs from v8.1.0735.
Note that index() was already added as a method in v8.1.1803;
this patch only adds a test.
- iconv(): requires v8.1.1136 for test_termcodes.vim.
Nvim deprecated inputdialog(), so it no longer has an eval.txt entry.
Keep the test for hlexists() commented-out, just like previously. (Nvim
always defines the Number group, so it always returns 1 instead)
Cannot include both changes to test_syn_attr.vim as Nvim doesn't support
":hi term=..."; however, both test the same ->hlID() syntax anyway.
125 lines
3.7 KiB
Lua
125 lines
3.7 KiB
Lua
local helpers = require('test.functional.helpers')(after_each)
|
|
local clear, source = helpers.clear, helpers.source
|
|
local eq, eval, command = helpers.eq, helpers.eval, helpers.command
|
|
local exc_exec = helpers.exc_exec
|
|
|
|
describe('Test for delete()', function()
|
|
before_each(clear)
|
|
after_each(function()
|
|
os.remove('Xfile')
|
|
end)
|
|
|
|
it('file delete', function()
|
|
command('split Xfile')
|
|
command("call setline(1, ['a', 'b'])")
|
|
command('wq')
|
|
eq(eval("['a', 'b']"), eval("readfile('Xfile')"))
|
|
eq(0, eval("delete('Xfile')"))
|
|
eq(-1, eval("delete('Xfile')"))
|
|
end)
|
|
|
|
it('directory delete', function()
|
|
command("call mkdir('Xdir1')")
|
|
eq(1, eval("isdirectory('Xdir1')"))
|
|
eq(0, eval("delete('Xdir1', 'd')"))
|
|
eq(0, eval("isdirectory('Xdir1')"))
|
|
eq(-1, eval("delete('Xdir1', 'd')"))
|
|
end)
|
|
it('recursive delete', function()
|
|
command("call mkdir('Xdir1')")
|
|
command("call mkdir('Xdir1/subdir')")
|
|
command("call mkdir('Xdir1/empty')")
|
|
command('split Xdir1/Xfile')
|
|
command("call setline(1, ['a', 'b'])")
|
|
command('w')
|
|
command('w Xdir1/subdir/Xfile')
|
|
command('close')
|
|
|
|
eq(1, eval("isdirectory('Xdir1')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir1/Xfile')"))
|
|
eq(1, eval("isdirectory('Xdir1/subdir')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir1/subdir/Xfile')"))
|
|
eq(1, eval("'Xdir1/empty'->isdirectory()"))
|
|
eq(0, eval("delete('Xdir1', 'rf')"))
|
|
eq(0, eval("isdirectory('Xdir1')"))
|
|
eq(-1, eval("delete('Xdir1', 'd')"))
|
|
end)
|
|
|
|
it('symlink delete', function()
|
|
source([[
|
|
split Xfile
|
|
call setline(1, ['a', 'b'])
|
|
wq
|
|
if has('win32')
|
|
silent !mklink Xlink Xfile
|
|
else
|
|
silent !ln -s Xfile Xlink
|
|
endif
|
|
]])
|
|
if eval('v:shell_error') ~= 0 then
|
|
pending('Cannot create symlink')
|
|
end
|
|
-- Delete the link, not the file
|
|
eq(0, eval("delete('Xlink')"))
|
|
eq(-1, eval("delete('Xlink')"))
|
|
eq(0, eval("delete('Xfile')"))
|
|
end)
|
|
|
|
it('symlink directory delete', function()
|
|
command("call mkdir('Xdir1')")
|
|
if helpers.iswin() then
|
|
command("silent !mklink /j Xlink Xdir1")
|
|
else
|
|
command("silent !ln -s Xdir1 Xlink")
|
|
end
|
|
eq(1, eval("isdirectory('Xdir1')"))
|
|
eq(1, eval("isdirectory('Xlink')"))
|
|
-- Delete the link, not the directory
|
|
eq(0, eval("delete('Xlink')"))
|
|
eq(-1, eval("delete('Xlink')"))
|
|
eq(0, eval("delete('Xdir1', 'd')"))
|
|
end)
|
|
|
|
it('symlink recursive delete', function()
|
|
source([[
|
|
call mkdir('Xdir3')
|
|
call mkdir('Xdir3/subdir')
|
|
call mkdir('Xdir4')
|
|
split Xdir3/Xfile
|
|
call setline(1, ['a', 'b'])
|
|
w
|
|
w Xdir3/subdir/Xfile
|
|
w Xdir4/Xfile
|
|
close
|
|
if has('win32')
|
|
silent !mklink /j Xdir3\Xlink Xdir4
|
|
else
|
|
silent !ln -s ../Xdir4 Xdir3/Xlink
|
|
endif
|
|
]])
|
|
|
|
eq(1, eval("isdirectory('Xdir3')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir3/Xfile')"))
|
|
eq(1, eval("isdirectory('Xdir3/subdir')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir3/subdir/Xfile')"))
|
|
eq(1, eval("isdirectory('Xdir4')"))
|
|
eq(1, eval("isdirectory('Xdir3/Xlink')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir4/Xfile')"))
|
|
|
|
eq(0, eval("delete('Xdir3', 'rf')"))
|
|
eq(0, eval("isdirectory('Xdir3')"))
|
|
eq(-1, eval("delete('Xdir3', 'd')"))
|
|
-- symlink is deleted, not the directory it points to
|
|
eq(1, eval("isdirectory('Xdir4')"))
|
|
eq(eval("['a', 'b']"), eval("readfile('Xdir4/Xfile')"))
|
|
eq(0, eval("delete('Xdir4/Xfile')"))
|
|
eq(0, eval("delete('Xdir4', 'd')"))
|
|
end)
|
|
|
|
it('gives correct emsgs', function()
|
|
eq('Vim(call):E474: Invalid argument', exc_exec("call delete('')"))
|
|
eq('Vim(call):E15: Invalid expression: 0',
|
|
exc_exec("call delete('foo', 0)"))
|
|
end)
|
|
end)
|