mirror of
https://github.com/neovim/neovim.git
synced 2024-12-20 11:15:14 -07:00
129 lines
3.4 KiB
Lua
129 lines
3.4 KiB
Lua
local t = require('test.unit.testutil')
|
|
local itp = t.gen_itp(it)
|
|
local t_eval = require('test.unit.eval.testutil')
|
|
|
|
local alloc_log_new = t.alloc_log_new
|
|
local cimport = t.cimport
|
|
local ffi = t.ffi
|
|
local eq = t.eq
|
|
|
|
local a = t_eval.alloc_logging_t
|
|
local type_key = t_eval.type_key
|
|
local list_type = t_eval.list_type
|
|
local list_items = t_eval.list_items
|
|
local dict_items = t_eval.dict_items
|
|
local lua2typvalt = t_eval.lua2typvalt
|
|
|
|
local lib = cimport('./src/nvim/eval/typval.h', './src/nvim/eval.h')
|
|
|
|
local alloc_log = alloc_log_new()
|
|
|
|
before_each(function()
|
|
alloc_log:before_each()
|
|
end)
|
|
|
|
after_each(function()
|
|
alloc_log:after_each()
|
|
end)
|
|
|
|
describe('tv_clear()', function()
|
|
itp('successfully frees all lists in [&l [1], *l, *l]', function()
|
|
local l_inner = { 1 }
|
|
local list = { l_inner, l_inner, l_inner }
|
|
local list_tv = ffi.gc(lua2typvalt(list), nil)
|
|
local list_p = list_tv.vval.v_list
|
|
local lis = list_items(list_p)
|
|
local list_inner_p = lis[1].li_tv.vval.v_list
|
|
local lis_inner = list_items(list_inner_p)
|
|
alloc_log:check({
|
|
a.list(list_p),
|
|
a.list(list_inner_p),
|
|
a.li(lis_inner[1]),
|
|
a.li(lis[1]),
|
|
a.li(lis[2]),
|
|
a.li(lis[3]),
|
|
})
|
|
eq(3, list_inner_p.lv_refcount)
|
|
lib.tv_clear(list_tv)
|
|
alloc_log:check({
|
|
a.freed(lis_inner[1]),
|
|
a.freed(list_inner_p),
|
|
a.freed(lis[1]),
|
|
a.freed(lis[2]),
|
|
a.freed(lis[3]),
|
|
a.freed(list_p),
|
|
})
|
|
end)
|
|
itp('successfully frees all lists in [&l [], *l, *l]', function()
|
|
local l_inner = { [type_key] = list_type }
|
|
local list = { l_inner, l_inner, l_inner }
|
|
local list_tv = ffi.gc(lua2typvalt(list), nil)
|
|
local list_p = list_tv.vval.v_list
|
|
local lis = list_items(list_p)
|
|
local list_inner_p = lis[1].li_tv.vval.v_list
|
|
alloc_log:check({
|
|
a.list(list_p),
|
|
a.list(list_inner_p),
|
|
a.li(lis[1]),
|
|
a.li(lis[2]),
|
|
a.li(lis[3]),
|
|
})
|
|
eq(3, list_inner_p.lv_refcount)
|
|
lib.tv_clear(list_tv)
|
|
alloc_log:check({
|
|
a.freed(list_inner_p),
|
|
a.freed(lis[1]),
|
|
a.freed(lis[2]),
|
|
a.freed(lis[3]),
|
|
a.freed(list_p),
|
|
})
|
|
end)
|
|
itp('successfully frees all dictionaries in [&d {}, *d]', function()
|
|
local d_inner = {}
|
|
local list = { d_inner, d_inner }
|
|
local list_tv = ffi.gc(lua2typvalt(list), nil)
|
|
local list_p = list_tv.vval.v_list
|
|
local lis = list_items(list_p)
|
|
local dict_inner_p = lis[1].li_tv.vval.v_dict
|
|
alloc_log:check({
|
|
a.list(list_p),
|
|
a.dict(dict_inner_p),
|
|
a.li(lis[1]),
|
|
a.li(lis[2]),
|
|
})
|
|
eq(2, dict_inner_p.dv_refcount)
|
|
lib.tv_clear(list_tv)
|
|
alloc_log:check({
|
|
a.freed(dict_inner_p),
|
|
a.freed(lis[1]),
|
|
a.freed(lis[2]),
|
|
a.freed(list_p),
|
|
})
|
|
end)
|
|
itp('successfully frees all dictionaries in [&d {a: 1}, *d]', function()
|
|
local d_inner = { a = 1 }
|
|
local list = { d_inner, d_inner }
|
|
local list_tv = ffi.gc(lua2typvalt(list), nil)
|
|
local list_p = list_tv.vval.v_list
|
|
local lis = list_items(list_p)
|
|
local dict_inner_p = lis[1].li_tv.vval.v_dict
|
|
local dis = dict_items(dict_inner_p)
|
|
alloc_log:check({
|
|
a.list(list_p),
|
|
a.dict(dict_inner_p),
|
|
a.di(dis.a, 1),
|
|
a.li(lis[1]),
|
|
a.li(lis[2]),
|
|
})
|
|
eq(2, dict_inner_p.dv_refcount)
|
|
lib.tv_clear(list_tv)
|
|
alloc_log:check({
|
|
a.freed(dis.a),
|
|
a.freed(dict_inner_p),
|
|
a.freed(lis[1]),
|
|
a.freed(lis[2]),
|
|
a.freed(list_p),
|
|
})
|
|
end)
|
|
end)
|