unittests: Add tests for vim_to_object function

1 files changed, 17 insertions, 17 deletions

diff --git a/test/unit/eval/encode_spec.lua b/test/unit/eval/encode_spec.lua
index f151a191fb..98fc8305e0 100644
--- a/test/unit/eval/encode_spec.lua
+++ b/test/unit/eval/encode_spec.lua
@@ -27,74 +27,74 @@ describe('encode_list_write()', function()
   it('writes ASCII string literal with printable characters', function()
     local l = list()
     eq(0, encode_list_write(l, 'abc'))
-    eq({[type_key]=list_type, 'abc'}, lst2tbl(l))
+    eq({'abc'}, lst2tbl(l))
   end)
 
   it('writes string starting with NL', function()
     local l = list()
     eq(0, encode_list_write(l, '\nabc'))
-    eq({[type_key]=list_type, null_string, 'abc'}, lst2tbl(l))
+    eq({null_string, 'abc'}, lst2tbl(l))
   end)
 
   it('writes string starting with NL twice', function()
     local l = list()
     eq(0, encode_list_write(l, '\nabc'))
-    eq({[type_key]=list_type, null_string, 'abc'}, lst2tbl(l))
+    eq({null_string, 'abc'}, lst2tbl(l))
     eq(0, encode_list_write(l, '\nabc'))
-    eq({[type_key]=list_type, null_string, 'abc', 'abc'}, lst2tbl(l))
+    eq({null_string, 'abc', 'abc'}, lst2tbl(l))
   end)
 
   it('writes string ending with NL', function()
     local l = list()
     eq(0, encode_list_write(l, 'abc\n'))
-    eq({[type_key]=list_type, 'abc', null_string}, lst2tbl(l))
+    eq({'abc', null_string}, lst2tbl(l))
   end)
 
   it('writes string ending with NL twice', function()
     local l = list()
     eq(0, encode_list_write(l, 'abc\n'))
-    eq({[type_key]=list_type, 'abc', null_string}, lst2tbl(l))
+    eq({'abc', null_string}, lst2tbl(l))
     eq(0, encode_list_write(l, 'abc\n'))
-    eq({[type_key]=list_type, 'abc', 'abc', null_string}, lst2tbl(l))
+    eq({'abc', 'abc', null_string}, lst2tbl(l))
   end)
 
   it('writes string starting, ending and containing NL twice', function()
     local l = list()
     eq(0, encode_list_write(l, '\na\nb\n'))
-    eq({[type_key]=list_type, null_string, 'a', 'b', null_string}, lst2tbl(l))
+    eq({null_string, 'a', 'b', null_string}, lst2tbl(l))
     eq(0, encode_list_write(l, '\na\nb\n'))
-    eq({[type_key]=list_type, null_string, 'a', 'b', null_string, 'a', 'b', null_string}, lst2tbl(l))
+    eq({null_string, 'a', 'b', null_string, 'a', 'b', null_string}, lst2tbl(l))
   end)
 
   it('writes string starting, ending and containing NUL with NL between twice', function()
     local l = list()
     eq(0, encode_list_write(l, '\0\n\0\n\0'))
-    eq({[type_key]=list_type, '\n', '\n', '\n'}, lst2tbl(l))
+    eq({'\n', '\n', '\n'}, lst2tbl(l))
     eq(0, encode_list_write(l, '\0\n\0\n\0'))
-    eq({[type_key]=list_type, '\n', '\n', '\n\n', '\n', '\n'}, lst2tbl(l))
+    eq({'\n', '\n', '\n\n', '\n', '\n'}, lst2tbl(l))
   end)
 
   it('writes string starting, ending and containing NL with NUL between twice', function()
     local l = list()
     eq(0, encode_list_write(l, '\n\0\n\0\n'))
-    eq({[type_key]=list_type, null_string, '\n', '\n', null_string}, lst2tbl(l))
+    eq({null_string, '\n', '\n', null_string}, lst2tbl(l))
     eq(0, encode_list_write(l, '\n\0\n\0\n'))
-    eq({[type_key]=list_type, null_string, '\n', '\n', null_string, '\n', '\n', null_string}, lst2tbl(l))
+    eq({null_string, '\n', '\n', null_string, '\n', '\n', null_string}, lst2tbl(l))
   end)
 
   it('writes string containing a single NL twice', function()
     local l = list()
     eq(0, encode_list_write(l, '\n'))
-    eq({[type_key]=list_type, null_string, null_string}, lst2tbl(l))
+    eq({null_string, null_string}, lst2tbl(l))
     eq(0, encode_list_write(l, '\n'))
-    eq({[type_key]=list_type, null_string, null_string, null_string}, lst2tbl(l))
+    eq({null_string, null_string, null_string}, lst2tbl(l))
   end)
 
   it('writes string containing a few NLs twice', function()
     local l = list()
     eq(0, encode_list_write(l, '\n\n\n'))
-    eq({[type_key]=list_type, null_string, null_string, null_string, null_string}, lst2tbl(l))
+    eq({null_string, null_string, null_string, null_string}, lst2tbl(l))
     eq(0, encode_list_write(l, '\n\n\n'))
-    eq({[type_key]=list_type, null_string, null_string, null_string, null_string, null_string, null_string, null_string}, lst2tbl(l))
+    eq({null_string, null_string, null_string, null_string, null_string, null_string, null_string}, lst2tbl(l))
   end)
 end)