Tests: add errorlist_spec.lua

test/functional/viml/errorlist_spec.lua

@@ -0,0 +1,49 @@
+local helpers = require('test.functional.helpers')
+
+local clear = helpers.clear
+local command = helpers.command
+local eq = helpers.eq
+local exc_exec = helpers.exc_exec
+local get_cur_win_var = helpers.curwinmeths.get_var
+
+describe('setqflist()', function()
+  local setqflist = helpers.funcs.setqflist
+
+  before_each(clear)
+
+  it('sets w:quickfix_title', function()
+    setqflist({''}, 'r', 'foo')
+    command('copen')
+    eq(':foo', get_cur_win_var('quickfix_title'))
+  end)
+
+  it('expects a proper type for {title}', function()
+    command('copen')
+    setqflist({''}, 'r', '5')
+    eq(':5', get_cur_win_var('quickfix_title'))
+    setqflist({''}, 'r', 6)
+    eq(':6', get_cur_win_var('quickfix_title'))
+    local exc = exc_exec('call setqflist([""], "r", function("function"))')
+    eq('Vim(call):E729: using Funcref as a String', exc)
+    exc = exc_exec('call setqflist([""], "r", [])')
+    eq('Vim(call):E730: using List as a String', exc)
+    exc = exc_exec('call setqflist([""], "r", {})')
+    eq('Vim(call):E731: using Dictionary as a String', exc)
+  end)
+end)
+
+describe('setloclist()', function()
+  local setloclist = helpers.funcs.setloclist
+
+  before_each(clear)
+
+  it('sets w:quickfix_title for the correct window', function()
+    command('rightbelow vsplit')
+    setloclist(1, {''}, 'r', 'foo')
+    setloclist(2, {''}, 'r', 'bar')
+    command('lopen')
+    eq(':bar', get_cur_win_var('quickfix_title'))
+    command('lclose | wincmd w | lopen')
+    eq(':foo', get_cur_win_var('quickfix_title'))
+  end)
+end)