author | Kim Alvefur <zash@zash.se> |
Mon, 12 Dec 2022 07:07:13 +0100 | |
branch | 0.12 |
changeset 12803 | 3784a8ce0596 |
parent 11791 | 3ae6fa901a8b |
child 13249 | ffe4adbd2af9 |
permissions | -rw-r--r-- |
10104 | 1 |
local array = require "util.array"; |
2 |
describe("util.array", function () |
|
3 |
describe("creation", function () |
|
10401 | 4 |
describe("from table", function () |
10104 | 5 |
it("works", function () |
6 |
local a = array({"a", "b", "c"}); |
|
7 |
assert.same({"a", "b", "c"}, a); |
|
8 |
end); |
|
9 |
end); |
|
10 |
||
11 |
describe("from iterator", function () |
|
12 |
it("works", function () |
|
13 |
-- collects the first value, ie the keys |
|
14 |
local a = array(ipairs({true, true, true})); |
|
15 |
assert.same({1, 2, 3}, a); |
|
16 |
end); |
|
17 |
end); |
|
18 |
||
19 |
describe("collect", function () |
|
20 |
it("works", function () |
|
21 |
-- collects the first value, ie the keys |
|
22 |
local a = array.collect(ipairs({true, true, true})); |
|
23 |
assert.same({1, 2, 3}, a); |
|
24 |
end); |
|
25 |
end); |
|
26 |
||
27 |
end); |
|
28 |
||
29 |
describe("metatable", function () |
|
30 |
describe("operator", function () |
|
31 |
describe("addition", function () |
|
32 |
it("works", function () |
|
33 |
local a = array({ "a", "b" }); |
|
34 |
local b = array({ "c", "d" }); |
|
35 |
assert.same({"a", "b", "c", "d"}, a + b); |
|
36 |
end); |
|
37 |
end); |
|
38 |
||
39 |
describe("equality", function () |
|
40 |
it("works", function () |
|
41 |
local a1 = array({ "a", "b" }); |
|
42 |
local a2 = array({ "a", "b" }); |
|
43 |
local b = array({ "c", "d" }); |
|
44 |
assert.truthy(a1 == a2); |
|
45 |
assert.falsy(a1 == b); |
|
10594
257dc26e8e65
util.array: Add a test case for a behavior change in Lua 5.3
Kim Alvefur <zash@zash.se>
parents:
10401
diff
changeset
|
46 |
assert.falsy(a1 == { "a", "b" }, "Behavior of metatables changed in Lua 5.3"); |
10104 | 47 |
end); |
48 |
end); |
|
49 |
||
50 |
describe("division", function () |
|
51 |
it("works", function () |
|
52 |
local a = array({ "a", "b", "c" }); |
|
53 |
local b = a / function (i) if i ~= "b" then return i .. "x" end end; |
|
54 |
assert.same({ "ax", "cx" }, b); |
|
55 |
end); |
|
56 |
end); |
|
57 |
||
58 |
end); |
|
59 |
end); |
|
60 |
||
61 |
describe("methods", function () |
|
62 |
describe("map", function () |
|
63 |
it("works", function () |
|
64 |
local a = array({ "a", "b", "c" }); |
|
65 |
local b = a:map(string.upper); |
|
66 |
assert.same({ "A", "B", "C" }, b); |
|
67 |
end); |
|
68 |
end); |
|
69 |
||
70 |
describe("filter", function () |
|
71 |
it("works", function () |
|
72 |
local a = array({ "a", "b", "c" }); |
|
73 |
a:filter(function (i) return i ~= "b" end); |
|
74 |
assert.same({ "a", "c" }, a); |
|
75 |
end); |
|
76 |
end); |
|
77 |
||
78 |
describe("sort", function () |
|
79 |
it("works", function () |
|
80 |
local a = array({ 5, 4, 3, 1, 2, }); |
|
81 |
a:sort(); |
|
82 |
assert.same({ 1, 2, 3, 4, 5, }, a); |
|
83 |
end); |
|
84 |
end); |
|
85 |
||
86 |
describe("unique", function () |
|
87 |
it("works", function () |
|
88 |
local a = array({ "a", "b", "c", "c", "a", "b" }); |
|
89 |
a:unique(); |
|
90 |
assert.same({ "a", "b", "c" }, a); |
|
91 |
end); |
|
92 |
end); |
|
93 |
||
94 |
describe("pluck", function () |
|
95 |
it("works", function () |
|
96 |
local a = array({ { a = 1, b = -1 }, { a = 2, b = -2 }, }); |
|
97 |
a:pluck("a"); |
|
98 |
assert.same({ 1, 2 }, a); |
|
99 |
end); |
|
100 |
end); |
|
101 |
||
102 |
||
103 |
describe("reverse", function () |
|
104 |
it("works", function () |
|
105 |
local a = array({ "a", "b", "c" }); |
|
106 |
a:reverse(); |
|
107 |
assert.same({ "c", "b", "a" }, a); |
|
108 |
end); |
|
109 |
end); |
|
110 |
||
111 |
-- TODO :shuffle |
|
112 |
||
113 |
describe("append", function () |
|
114 |
it("works", function () |
|
115 |
local a = array({ "a", "b", "c" }); |
|
116 |
a:append(array({ "d", "e", })); |
|
117 |
assert.same({ "a", "b", "c", "d", "e" }, a); |
|
118 |
end); |
|
119 |
end); |
|
120 |
||
121 |
describe("push", function () |
|
122 |
it("works", function () |
|
123 |
local a = array({ "a", "b", "c" }); |
|
124 |
a:push("d"):push("e"); |
|
125 |
assert.same({ "a", "b", "c", "d", "e" }, a); |
|
126 |
end); |
|
127 |
end); |
|
128 |
||
129 |
describe("pop", function () |
|
130 |
it("works", function () |
|
131 |
local a = array({ "a", "b", "c" }); |
|
132 |
assert.equal("c", a:pop()); |
|
133 |
assert.same({ "a", "b", }, a); |
|
134 |
end); |
|
135 |
end); |
|
136 |
||
137 |
describe("concat", function () |
|
138 |
it("works", function () |
|
139 |
local a = array({ "a", "b", "c" }); |
|
140 |
assert.equal("a,b,c", a:concat(",")); |
|
141 |
end); |
|
142 |
end); |
|
143 |
||
144 |
describe("length", function () |
|
145 |
it("works", function () |
|
146 |
local a = array({ "a", "b", "c" }); |
|
147 |
assert.equal(3, a:length()); |
|
148 |
end); |
|
149 |
end); |
|
150 |
||
11791
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
151 |
describe("slice", function () |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
152 |
it("works", function () |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
153 |
local a = array({ "a", "b", "c" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
154 |
assert.equal(array.slice(a, 1, 2), array{ "a", "b" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
155 |
assert.equal(array.slice(a, 1, 3), array{ "a", "b", "c" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
156 |
assert.equal(array.slice(a, 2, 3), array{ "b", "c" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
157 |
assert.equal(array.slice(a, 2), array{ "b", "c" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
158 |
assert.equal(array.slice(a, -4), array{ "a", "b", "c" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
159 |
assert.equal(array.slice(a, -3), array{ "a", "b", "c" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
160 |
assert.equal(array.slice(a, -2), array{ "b", "c" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
161 |
assert.equal(array.slice(a, -1), array{ "c" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
162 |
end); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
163 |
|
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
164 |
it("can mutate", function () |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
165 |
local a = array({ "a", "b", "c" }); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
166 |
assert.equal(a:slice(-1), array{"c"}); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
167 |
assert.equal(a, array{"c"}); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
168 |
end); |
3ae6fa901a8b
util.array: Add :slice() method + tests
Matthew Wild <mwild1@gmail.com>
parents:
10594
diff
changeset
|
169 |
end); |
10104 | 170 |
end); |
171 |
||
172 |
-- TODO The various array.foo(array ina, array outa) functions |
|
173 |
end); |
|
174 |