functests: Add tests

Contains a number of FIXMEs.

1 files changed, 105 insertions, 0 deletions

diff --git a/test/functional/eval/changedtick_spec.lua b/test/functional/eval/changedtick_spec.lua
new file mode 100644
index 0000000000..cf8297296f
--- /dev/null
+++ b/test/functional/eval/changedtick_spec.lua
@@ -0,0 +1,105 @@
+local helpers = require('test.functional.helpers')(after_each)
+
+local curbufmeths = helpers.curbufmeths
+local clear = helpers.clear
+local eq = helpers.eq
+local eval = helpers.eval
+local feed = helpers.feed
+local funcs = helpers.funcs
+local meths = helpers.meths
+local command = helpers.command
+local exc_exec = helpers.exc_exec
+local redir_exec = helpers.redir_exec
+
+before_each(clear)
+
+local function preinc(t, v) t.value = t.value + (v or 1) return t.value end
+
+local function changedtick()
+  local ct = curbufmeths.get_changedtick()
+  eq(ct, curbufmeths.get_var('changedtick'))
+  eq(ct, curbufmeths.get_var('changedtick'))
+  eq(ct, eval('b:changedtick'))
+  eq(ct, eval('b:["changedtick"]'))
+  eq(ct, eval('b:.changedtick'))
+  eq(ct, funcs.getbufvar('%', 'changedtick'))
+  eq(ct, funcs.getbufvar('%', '').changedtick)
+  eq(ct, eval('b:').changedtick)
+  return ct
+end
+
+describe('b:changedtick', function()
+  -- Ported tests from Vim-8.0.333
+  it('increments', function()  -- Test_changedtick_increments
+    -- New buffer has an empty line, tick starts at 2
+    eq(2, changedtick())
+    funcs.setline(1, 'hello')
+    eq(3, changedtick())
+    eq(0, exc_exec('undo'))
+    -- Somehow undo counts as two changes
+    eq(5, changedtick())
+  end)
+  it('is present in b: dictionary', function()
+    eq(2, changedtick())
+    command('let d = b:')
+    eq(2, meths.get_var('d').changedtick)
+  end)
+  it('increments at bdel', function()
+    command('new')
+    eq(2, changedtick())
+    local bnr = curbufmeths.get_number()
+    eq(2, bnr)
+    command('bdel')
+    eq(3, funcs.getbufvar(bnr, 'changedtick'))
+    eq(1, curbufmeths.get_number())
+  end)
+  it('fails to be changed by user', function()
+    local ct = changedtick()
+    local ctn = ct + 100500
+    eq(0, exc_exec('let d = b:'))
+    eq('\nE742: Cannot change value of b:changedtick',
+       redir_exec('let b:changedtick = ' .. ctn))
+    eq('\nE742: Cannot change value of b:["changedtick"] = ' .. ctn,
+       redir_exec('let b:["changedtick"] = ' .. ctn))
+    eq('\nE742: Cannot change value of b:.changedtick = ' .. ctn,
+       redir_exec('let b:.changedtick = ' .. ctn))
+    eq('\nE742: Cannot change value of d.changedtick = ' .. ctn,
+       redir_exec('let d.changedtick = ' .. ctn))
+    -- FIXME
+    -- eq({fales, ''},
+       -- {pcall(curbufmeths.set_var, 'changedtick', ctn)})
+
+    eq('\nE795: Cannot delete variable b:changedtick',
+       redir_exec('unlet b:changedtick'))
+    -- FIXME
+    -- eq('\nE795: Cannot delete variable b:.changedtick',
+       -- redir_exec('unlet b:.changedtick'))
+    -- eq('\nE795: Cannot delete variable b:["changedtick"]',
+       -- redir_exec('unlet b:["changedtick"]'))
+    -- eq('\nE795: Cannot delete variable d.changedtick',
+       -- redir_exec('unlet d.changedtick'))
+    -- FIXME
+    -- eq({},
+       -- {pcall(curbufmeths.del_var, 'changedtick')})
+    eq(ct, changedtick())
+
+    eq('\nE742: Cannot change value of b:["changedtick"] += ' .. ctn,
+       redir_exec('let b:["changedtick"] += ' .. ctn))
+    eq('\nE742: Cannot change value of b:["changedtick"] -= ' .. ctn,
+       redir_exec('let b:["changedtick"] -= ' .. ctn))
+    eq('\nE742: Cannot change value of b:["changedtick"] .= ' .. ctn,
+       redir_exec('let b:["changedtick"] .= ' .. ctn))
+  end)
+  it('is listed in :let output', function()
+    eq('\nb:changedtick         #2',
+       redir_exec(':let b:'))
+  end)
+  it('fails to unlock b:changedtick', function()
+    -- FIXME
+    -- eq('\nE', redir_exec('unlockvar b:changedtick'))
+  end)
+  it('is being completed', function()
+    feed(':echo b:<Tab><Home>let cmdline="<End>"<CR>')
+    eq('echo b:changedtick', meths.get_var('cmdline'))
+  end)
+end)