annotate src/testdir/test_lua.vim @ 14239:7457bf2db968 v8.1.0136

patch 8.1.0136: Lua tests don't cover new features commit https://github.com/vim/vim/commit/2f362bf7f9acc9ec87799d1e41bf0ae7712d1f7a Author: Bram Moolenaar <Bram@vim.org> Date: Sun Jul 1 19:49:27 2018 +0200 patch 8.1.0136: Lua tests don't cover new features Problem: Lua tests don't cover new features. Solution: Add more tests. (Dominique Pelle, closes https://github.com/vim/vim/issues/3130)
author Christian Brabandt <cb@256bit.org>
date Sun, 01 Jul 2018 20:00:09 +0200
parents e3bc8cdc94dd
children f445c5edb6af
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
10757
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Tests for Lua.
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3 if !has('lua')
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
4 finish
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5 endif
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
7 " Check that switching to another buffer does not trigger ml_get error.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
8 func Test_command_new_no_ml_get_error()
10757
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 new
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 let wincount = winnr('$')
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 call setline(1, ['one', 'two', 'three'])
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 luado vim.command("new")
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 call assert_equal(wincount + 1, winnr('$'))
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
14 %bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
15 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
16
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
17 " Test vim.command()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
18 func Test_command()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
19 new
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
20 call setline(1, ['one', 'two', 'three'])
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
21 luado vim.command("1,2d_")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
22 call assert_equal(['three'], getline(1, '$'))
10757
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 bwipe!
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
24 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
25
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
26 " Test vim.eval()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
27 func Test_eval()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
28 " lua.eval with a number
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
29 lua v = vim.eval('123')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
30 call assert_equal('number', luaeval('vim.type(v)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
31 call assert_equal(123.0, luaeval('v'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
32
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
33 " lua.eval with a string
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
34 lua v = vim.eval('"abc"')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
35 call assert_equal('string', luaeval('vim.type(v)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
36 call assert_equal('abc', luaeval('v'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
37
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
38 " lua.eval with a list
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
39 lua v = vim.eval("['a']")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
40 call assert_equal('list', luaeval('vim.type(v)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
41 call assert_equal(['a'], luaeval('v'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
42
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
43 " lua.eval with a dict
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
44 lua v = vim.eval("{'a':'b'}")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
45 call assert_equal('dict', luaeval('vim.type(v)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
46 call assert_equal({'a':'b'}, luaeval('v'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
47
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
48 call assert_fails('lua v = vim.eval(nil)',
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
49 \ "[string \"vim chunk\"]:1: bad argument #1 to 'eval' (string expected, got nil)")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
50 call assert_fails('lua v = vim.eval(true)',
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
51 \ "[string \"vim chunk\"]:1: bad argument #1 to 'eval' (string expected, got boolean)")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
52 call assert_fails('lua v = vim.eval({})',
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
53 \ "[string \"vim chunk\"]:1: bad argument #1 to 'eval' (string expected, got table)")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
54 call assert_fails('lua v = vim.eval(print)',
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
55 \ "[string \"vim chunk\"]:1: bad argument #1 to 'eval' (string expected, got function)")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
56 call assert_fails('lua v = vim.eval(vim.buffer())',
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
57 \ "[string \"vim chunk\"]:1: bad argument #1 to 'eval' (string expected, got userdata)")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
58
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
59 lua v = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
60 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
61
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
62 " Test vim.window()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
63 func Test_window()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
64 e Xfoo2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
65 new Xfoo1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
66
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
67 " Window 1 (top window) contains Xfoo1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
68 " Window 2 (bottom window) contains Xfoo2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
69 call assert_equal('Xfoo1', luaeval('vim.window(1):buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
70 call assert_equal('Xfoo2', luaeval('vim.window(2):buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
71
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
72 " Window 3 does not exist so vim.window(3) should return nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
73 call assert_equal('nil', luaeval('tostring(vim.window(3))'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
74
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
75 %bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
76 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
77
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
78 " Test vim.window().height
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
79 func Test_window_height()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
80 new
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
81 lua vim.window().height = 2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
82 call assert_equal(2, winheight(0))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
83 lua vim.window().height = vim.window().height + 1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
84 call assert_equal(3, winheight(0))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
85 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
86 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
87
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
88 " Test vim.window().width
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
89 func Test_window_width()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
90 vert new
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
91 lua vim.window().width = 2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
92 call assert_equal(2, winwidth(0))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
93 lua vim.window().width = vim.window().width + 1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
94 call assert_equal(3, winwidth(0))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
95 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
96 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
97
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
98 " Test vim.window().line and vim.window.col
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
99 func Test_window_line_col()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
100 new
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
101 call setline(1, ['line1', 'line2', 'line3'])
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
102 lua vim.window().line = 2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
103 lua vim.window().col = 4
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
104 call assert_equal([0, 2, 4, 0], getpos('.'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
105 lua vim.window().line = vim.window().line + 1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
106 lua vim.window().col = vim.window().col - 1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
107 call assert_equal([0, 3, 3, 0], getpos('.'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
108
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
109 call assert_fails('lua vim.window().line = 10',
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
110 \ '[string "vim chunk"]:1: line out of range')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
111 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
112 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
113
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
114 " Test setting the current window
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
115 func Test_window_set_current()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
116 new Xfoo1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
117 lua w1 = vim.window()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
118 new Xfoo2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
119 lua w2 = vim.window()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
120
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
121 call assert_equal('Xfoo2', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
122 lua w1()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
123 call assert_equal('Xfoo1', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
124 lua w2()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
125 call assert_equal('Xfoo2', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
126
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
127 lua w1, w2 = nil
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
128 %bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
129 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
130
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
131 " Test vim.window().buffer
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
132 func Test_window_buffer()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
133 new Xfoo1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
134 lua w1 = vim.window()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
135 lua b1 = w1.buffer()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
136 new Xfoo2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
137 lua w2 = vim.window()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
138 lua b2 = w2.buffer()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
139
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
140 lua b1()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
141 call assert_equal('Xfoo1', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
142 lua b2()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
143 call assert_equal('Xfoo2', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
144
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
145 lua b1, b2, w1, w2 = nil
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
146 %bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
147 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
148
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
149 " Test vim.window():previous() and vim.window():next()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
150 func Test_window_next_previous()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
151 new Xfoo1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
152 new Xfoo2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
153 new Xfoo3
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
154 wincmd j
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
155
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
156 call assert_equal('Xfoo2', luaeval('vim.window().buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
157 call assert_equal('Xfoo1', luaeval('vim.window():next():buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
158 call assert_equal('Xfoo3', luaeval('vim.window():previous():buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
159
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
160 %bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
161 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
162
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
163 " Test vim.window():isvalid()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
164 func Test_window_isvalid()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
165 new Xfoo
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
166 lua w = vim.window()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
167 call assert_true(luaeval('w:isvalid()'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
168
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
169 " FIXME: how to test the case when isvalid() returns v:false?
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
170 " isvalid() gives errors when the window is deleted. Is it a bug?
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
171
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
172 lua w = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
173 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
174 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
175
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
176 " Test vim.buffer() with and without argument
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
177 func Test_buffer()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
178 new Xfoo1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
179 let bn1 = bufnr('%')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
180 new Xfoo2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
181 let bn2 = bufnr('%')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
182
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
183 " Test vim.buffer() without argument.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
184 call assert_equal('Xfoo2', luaeval("vim.buffer().name"))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
185
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
186 " Test vim.buffer() with string argument.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
187 call assert_equal('Xfoo1', luaeval("vim.buffer('Xfoo1').name"))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
188 call assert_equal('Xfoo2', luaeval("vim.buffer('Xfoo2').name"))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
189
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
190 " Test vim.buffer() with integer argument.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
191 call assert_equal('Xfoo1', luaeval("vim.buffer(" . bn1 . ").name"))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
192 call assert_equal('Xfoo2', luaeval("vim.buffer(" . bn2 . ").name"))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
193
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
194 lua bn1, bn2 = nil
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
195 %bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
196 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
197
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
198 " Test vim.buffer().name and vim.buffer().fname
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
199 func Test_buffer_name()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
200 new
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
201 " FIXME: for an unnamed buffer, I would expect
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
202 " vim.buffer().name to give an empty string, but
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
203 " it returns 0. Is it a bug?
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
204 " so this assert_equal is commented out.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
205 " call assert_equal('', luaeval('vim.buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
206 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
207
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
208 new Xfoo
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
209 call assert_equal('Xfoo', luaeval('vim.buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
210 call assert_equal(expand('%:p'), luaeval('vim.buffer().fname'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
211 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
212 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
213
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
214 " Test vim.buffer().number
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
215 func Test_buffer_number()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
216 " All numbers in Lua are floating points number (no integers).
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
217 call assert_equal(bufnr('%'), float2nr(luaeval('vim.buffer().number')))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
218 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
219
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
220 " Test inserting lines in buffer.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
221 func Test_buffer_insert()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
222 new
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
223 lua vim.buffer()[1] = '3'
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
224 lua vim.buffer():insert('1', 0)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
225 lua vim.buffer():insert('2', 1)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
226 lua vim.buffer():insert('4', 10)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
227
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
228 call assert_equal(['1', '2', '3', '4'], getline(1, '$'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
229 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
230 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
231
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
232 " Test deleting line in buffer
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
233 func Test_buffer_delete()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
234 new
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
235 call setline(1, ['1', '2', '3'])
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
236 lua vim.buffer()[2] = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
237 call assert_equal(['1', '3'], getline(1, '$'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
238
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
239 call assert_fails('lua vim.buffer()[3] = nil',
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
240 \ '[string "vim chunk"]:1: invalid line number')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
241 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
242 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
243
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
244 " Test #vim.buffer() i.e. number of lines in buffer
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
245 func Test_buffer_number_lines()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
246 new
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
247 call setline(1, ['a', 'b', 'c'])
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
248 call assert_equal(3.0, luaeval('#vim.buffer()'))
10757
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
249 bwipe!
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
250 endfunc
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
251
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
252 " Test vim.buffer():next() and vim.buffer():previous()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
253 " Note that these functions get the next or previous buffers
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
254 " but do not switch buffer.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
255 func Test_buffer_next_previous()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
256 new Xfoo1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
257 new Xfoo2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
258 new Xfoo3
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
259 b Xfoo2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
260
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
261 lua bn = vim.buffer():next()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
262 lua bp = vim.buffer():previous()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
263
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
264 call assert_equal('Xfoo2', luaeval('vim.buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
265 call assert_equal('Xfoo1', luaeval('bp.name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
266 call assert_equal('Xfoo3', luaeval('bn.name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
267
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
268 call assert_equal('Xfoo2', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
269
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
270 lua bn()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
271 call assert_equal('Xfoo3', luaeval('vim.buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
272 call assert_equal('Xfoo3', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
273
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
274 lua bp()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
275 call assert_equal('Xfoo1', luaeval('vim.buffer().name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
276 call assert_equal('Xfoo1', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
277
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
278 lua bn, bp = nil
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
279 %bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
280 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
281
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
282 " Test vim.buffer():isvalid()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
283 func Test_buffer_isvalid()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
284 new Xfoo
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
285 lua b = vim.buffer()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
286 call assert_true(luaeval('b:isvalid()'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
287
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
288 " FIXME: how to test the case when isvalid() returns v:false?
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
289 " isvalid() gives errors when the buffer is wiped. Is it a bug?
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
290
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
291 lua b = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
292 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
293 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
294
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
295 func Test_list()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
296 call assert_equal([], luaeval('vim.list()'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
297
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
298 let l = []
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
299 lua l = vim.eval('l')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
300 lua l:add(123)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
301 lua l:add('abc')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
302 lua l:add(true)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
303 lua l:add(false)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
304 lua l:add(vim.eval("[1, 2, 3]"))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
305 lua l:add(vim.eval("{'a':1, 'b':2, 'c':3}"))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
306 call assert_equal([123.0, 'abc', v:true, v:false, [1, 2, 3], {'a': 1, 'b': 2, 'c': 3}], l)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
307 call assert_equal(6.0, luaeval('#l'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
308 call assert_match('^list: 0x\x\+$', luaeval('tostring(l)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
309
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
310 lua l[0] = 124
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
311 lua l[4] = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
312 lua l:insert('first')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
313 lua l:insert('xx', 3)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
314 call assert_equal(['first', 124.0, 'abc', 'xx', v:true, v:false, {'a': 1, 'b': 2, 'c': 3}], l)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
315
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
316 lockvar 1 l
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
317 call assert_fails('lua l:add("x")', '[string "vim chunk"]:1: list is locked')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
318
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
319 lua l = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
320 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
321
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
322 func Test_list_table()
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
323 " See :help lua-vim
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
324 " Non-numeric keys should not be used to initialize the list
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
325 " so say = 'hi' should be ignored.
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
326 lua t = {3.14, 'hello', false, true, say = 'hi'}
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
327 call assert_equal([3.14, 'hello', v:false, v:true], luaeval('vim.list(t)'))
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
328 lua t = nil
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
329
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
330 call assert_fails('lua vim.list(1)', '[string "vim chunk"]:1: table expected, got number')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
331 call assert_fails('lua vim.list("x")', '[string "vim chunk"]:1: table expected, got string')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
332 call assert_fails('lua vim.list(print)', '[string "vim chunk"]:1: table expected, got function')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
333 call assert_fails('lua vim.list(true)', '[string "vim chunk"]:1: table expected, got boolean')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
334 endfunc
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
335
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
336 " Test l() i.e. iterator on list
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
337 func Test_list_iter()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
338 lua l = vim.list():add('foo'):add('bar')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
339 lua str = ''
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
340 lua for v in l() do str = str .. v end
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
341 call assert_equal('foobar', luaeval('str'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
342
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
343 lua str, l = nil
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
344 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
345
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
346 func Test_recursive_list()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
347 lua l = vim.list():add(1):add(2)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
348 lua l = l:add(l)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
349
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
350 call assert_equal(1.0, luaeval('l[0]'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
351 call assert_equal(2.0, luaeval('l[1]'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
352
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
353 call assert_equal(1.0, luaeval('l[2][0]'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
354 call assert_equal(2.0, luaeval('l[2][1]'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
355
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
356 call assert_equal(1.0, luaeval('l[2][2][0]'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
357 call assert_equal(2.0, luaeval('l[2][2][1]'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
358
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
359 call assert_equal('[1.0, 2.0, [...]]', string(luaeval('l')))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
360
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
361 call assert_match('^list: 0x\x\+$', luaeval('tostring(l)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
362 call assert_equal(luaeval('tostring(l)'), luaeval('tostring(l[2])'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
363
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
364 call assert_equal(luaeval('l'), luaeval('l[2]'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
365 call assert_equal(luaeval('l'), luaeval('l[2][2]'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
366
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
367 lua l = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
368 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
369
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
370 func Test_dict()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
371 call assert_equal({}, luaeval('vim.dict()'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
372
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
373 let d = {}
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
374 lua d = vim.eval('d')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
375 lua d[0] = 123
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
376 lua d[1] = "abc"
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
377 lua d[2] = true
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
378 lua d[3] = false
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
379 lua d[4] = vim.eval("[1, 2, 3]")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
380 lua d[5] = vim.eval("{'a':1, 'b':2, 'c':3}")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
381 call assert_equal({'0':123.0, '1':'abc', '2':v:true, '3':v:false, '4': [1, 2, 3], '5': {'a':1, 'b':2, 'c':3}}, d)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
382 call assert_equal(6.0, luaeval('#d'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
383 call assert_match('^dict: 0x\x\+$', luaeval('tostring(d)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
384
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
385 call assert_equal('abc', luaeval('d[1]'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
386
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
387 lua d[0] = 124
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
388 lua d[4] = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
389 call assert_equal({'0':124.0, '1':'abc', '2':v:true, '3':v:false, '5': {'a':1, 'b':2, 'c':3}}, d)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
390
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
391 lockvar 1 d
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
392 call assert_fails('lua d[6] = 1', '[string "vim chunk"]:1: dict is locked')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
393
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
394 lua d = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
395 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
396
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
397 func Test_dict_table()
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
398 lua t = {key1 = 'x', key2 = 3.14, key3 = true, key4 = false}
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
399 call assert_equal({'key1': 'x', 'key2': 3.14, 'key3': v:true, 'key4': v:false},
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
400 \ luaeval('vim.dict(t)'))
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
401
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
402 " Same example as in :help lua-vim.
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
403 lua t = {math.pi, false, say = 'hi'}
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
404 " FIXME: commented out as it currently does not work as documented:
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
405 " Expected {'say': 'hi'}
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
406 " but got {'1': 3.141593, '2': v:false, 'say': 'hi'}
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
407 " Is the documentation or the code wrong?
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
408 "call assert_equal({'say' : 'hi'}, luaeval('vim.dict(t)'))
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
409 lua t = nil
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
410
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
411 call assert_fails('lua vim.dict(1)', '[string "vim chunk"]:1: table expected, got number')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
412 call assert_fails('lua vim.dict("x")', '[string "vim chunk"]:1: table expected, got string')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
413 call assert_fails('lua vim.dict(print)', '[string "vim chunk"]:1: table expected, got function')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
414 call assert_fails('lua vim.dict(true)', '[string "vim chunk"]:1: table expected, got boolean')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
415 endfunc
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
416
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
417 " Test d() i.e. iterator on dictionary
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
418 func Test_dict_iter()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
419 let d = {'a': 1, 'b':2}
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
420 lua d = vim.eval('d')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
421 lua str = ''
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
422 lua for k,v in d() do str = str .. k ..':' .. v .. ',' end
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
423 call assert_equal('a:1,b:2,', luaeval('str'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
424
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
425 lua str, d = nil
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
426 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
427
14235
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
428 func Test_funcref()
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
429 function I(x)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
430 return a:x
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
431 endfunction
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
432 let R = function('I')
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
433 lua i1 = vim.funcref"I"
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
434 lua i2 = vim.eval"R"
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
435 lua msg = "funcref|test|" .. (#i2(i1) == #i1(i2) and "OK" or "FAIL")
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
436 lua msg = vim.funcref"tr"(msg, "|", " ")
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
437 call assert_equal("funcref test OK", luaeval('msg'))
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
438
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
439 " dict funcref
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
440 function Mylen() dict
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
441 return len(self.data)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
442 endfunction
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
443 let l = [0, 1, 2, 3]
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
444 let mydict = {'data': l}
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
445 lua d = vim.eval"mydict"
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
446 lua d.len = vim.funcref"Mylen" -- assign d as 'self'
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
447 lua res = (d.len() == vim.funcref"len"(vim.eval"l")) and "OK" or "FAIL"
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
448 call assert_equal("OK", luaeval('res'))
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
449
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
450 lua i1, i2, msg, d, res = nil
14235
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
451 endfunc
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
452
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
453 " Test vim.type()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
454 func Test_type()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
455 " The following values are identical to Lua's type function.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
456 call assert_equal('string', luaeval('vim.type("foo")'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
457 call assert_equal('number', luaeval('vim.type(1)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
458 call assert_equal('number', luaeval('vim.type(1.2)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
459 call assert_equal('function', luaeval('vim.type(print)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
460 call assert_equal('table', luaeval('vim.type({})'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
461 call assert_equal('boolean', luaeval('vim.type(true)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
462 call assert_equal('boolean', luaeval('vim.type(false)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
463 call assert_equal('nil', luaeval('vim.type(nil)'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
464
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
465 " The following values are specific to Vim.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
466 call assert_equal('window', luaeval('vim.type(vim.window())'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
467 call assert_equal('buffer', luaeval('vim.type(vim.buffer())'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
468 call assert_equal('list', luaeval('vim.type(vim.list())'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
469 call assert_equal('dict', luaeval('vim.type(vim.dict())'))
14235
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref
Christian Brabandt <cb@256bit.org>
parents: 14230
diff changeset
470 call assert_equal('funcref', luaeval('vim.type(vim.funcref("Test_type"))'))
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
471 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
472
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
473 " Test vim.open()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
474 func Test_open()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
475 call assert_notmatch('XOpen', execute('ls'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
476
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
477 " Open a buffer XOpen1, but do not jump to it.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
478 lua b = vim.open('XOpen1')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
479 call assert_equal('XOpen1', luaeval('b.name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
480 call assert_equal('', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
481
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
482 call assert_match('XOpen1', execute('ls'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
483 call assert_notequal('XOpen2', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
484
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
485 " Open a buffer XOpen2 and jump to it.
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
486 lua b = vim.open('XOpen2')()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
487 call assert_equal('XOpen2', luaeval('b.name'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
488 call assert_equal('XOpen2', bufname('%'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
489
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
490 lua b = nil
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
491 %bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
492 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
493
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
494 " Test vim.line()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
495 func Test_line()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
496 new
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
497 call setline(1, ['first line', 'second line'])
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
498 1
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
499 call assert_equal('first line', luaeval('vim.line()'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
500 2
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
501 call assert_equal('second line', luaeval('vim.line()'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
502 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
503 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
504
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
505 " Test vim.beep()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
506 func Test_beep()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
507 call assert_beeps('lua vim.beep()')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
508 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
509
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
510 " Test errors in luaeval()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
511 func Test_luaeval_error()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
512 " Compile error
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
513 call assert_fails("call luaeval('-nil')",
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
514 \ '[string "luaeval"]:1: attempt to perform arithmetic on a nil value')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
515 call assert_fails("call luaeval(']')",
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
516 \ "[string \"luaeval\"]:1: unexpected symbol near ']'")
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
517 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
518
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
519 " Test :luafile foo.lua
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
520 func Test_luafile()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
521 call delete('Xlua_file')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
522 call writefile(["str = 'hello'", "num = 123.0" ], 'Xlua_file')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
523 call setfperm('Xlua_file', 'r-xr-xr-x')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
524
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
525 luafile Xlua_file
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
526 call assert_equal('hello', luaeval('str'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
527 call assert_equal(123.0, luaeval('num'))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
528
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
529 lua str, num = nil
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
530 call delete('Xlua_file')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
531 endfunc
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
532
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
533 " Test :luafile %
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
534 func Test_luafile_percent()
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
535 new Xlua_file
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
536 append
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
537 str, num = 'foo', 321.0
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
538 print(string.format('str=%s, num=%d', str, num))
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
539 .
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
540 w!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
541 luafile %
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
542 let msg = split(execute('message'), "\n")[-1]
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
543 call assert_equal('str=foo, num=321', msg)
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
544
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
545 lua str, num = nil
14230
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
546 call delete('Xlua_file')
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
547 bwipe!
2e95ea9afa1e patch 8.1.0132: lua tests are old style
Christian Brabandt <cb@256bit.org>
parents: 10757
diff changeset
548 endfunc
14239
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
549
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
550 " Test :luafile with syntax error
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
551 func Test_luafile_error()
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
552 new Xlua_file
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
553 call writefile(['nil = 0' ], 'Xlua_file')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
554 call setfperm('Xlua_file', 'r-xr-xr-x')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
555
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
556 call assert_fails('luafile Xlua_file', "Xlua_file:1: unexpected symbol near 'nil'")
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
557
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
558 call delete('Xlua_file')
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
559 bwipe!
7457bf2db968 patch 8.1.0136: Lua tests don't cover new features
Christian Brabandt <cb@256bit.org>
parents: 14235
diff changeset
560 endfunc