1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
function test_remove_if(t)
t:are_equal(table.remove_if({1, 2, 3, 4, 5, 6}, function (i, v) return (v % 2) == 0 end), {1, 3, 5})
t:are_equal(table.remove_if({a = 1, b = 2, c = 3}, function (i, v) return (v % 2) == 0 end), {a = 1, c = 3})
end
function test_find_if(t)
t:are_equal(table.find_if({1, 2, 3, 4, 5, 6}, function (i, v) return (v % 2) == 0 end), {2, 4, 6})
t:are_equal(table.find_first_if({1, 2, 3, 4, 5, 6}, function (i, v) return (v % 2) == 0 end), 2)
t:are_equal(table.find({1, 2, 4, 4, 5, 6}, 4), {3, 4})
t:are_equal(table.find_first({1, 2, 3, 4, 5, 6}, 4), 4)
end
function test_wrap(t)
t:are_equal(table.wrap(1), {1})
t:are_equal(table.wrap(nil), {})
t:are_equal(table.wrap({}), {})
t:are_equal(table.wrap({1}), {1})
t:are_equal(table.wrap({{}}), {{}})
local a = table.wrap_lock({1})
t:are_equal(table.wrap({a}), {a})
end
function test_unwrap(t)
t:are_equal(table.unwrap(1), 1)
t:are_equal(table.unwrap(nil), nil)
t:are_equal(table.unwrap({}), {})
t:are_equal(table.unwrap({1}), 1)
t:are_equal(table.unwrap({{}}), {})
local a = table.wrap_lock({1})
t:are_equal(table.unwrap(a), a)
end
|
