Combining two repos

luprex/core/lua/ut-table.lua

@@ -0,0 +1,76 @@
+
+makeclass("unittests")
+
+function unittests.tables()
+    -- check table.count
+    assert(table.count({}) == 0)
+    assert(table.count({a=1,b=2}) == 2)
+    assert(table.count({[2]=5,[5]=3}) == 2)
+
+    -- check table.clear
+    local t = { a = 1, b = 2 }
+    table.clear(t)
+    assert(t.a == nil)
+    assert(t.b == nil)
+    assert(table.count(t) == 0)
+
+    -- check table.empty
+    assert(table.empty({}) == true)
+    assert(table.empty({1}) == false)
+    assert(table.empty({a=1}) == false)
+
+    -- check table.equal
+    assert(table.equal({},{}))
+    assert(not table.equal({}, {1}))
+    assert(not table.equal({1}, {}))
+    assert(table.equal({1,2,3}, {1,2,3}))
+    assert(not table.equal({1,2,3}, {1,5,3}))
+    assert(not table.equal({1,2}, {1,2,3}))
+    assert(not table.equal({1,2,3}, {1,2}))
+    assert(table.equal({a=1,b=2},{a=1,b=2}))
+    assert(not table.equal({a=1,b=3},{a=1,b=2}))
+
+    -- check table.push
+    t = {}
+    table.push(t, 1)
+    assert(table.equal(t, {1}))
+    table.push(t, 2)
+    assert(table.equal(t, {1,2}))
+    table.push(t, 3)
+    assert(table.equal(t, {1,2,3}))
+    
+    -- check table.findremove
+    t = {1,2,3,4,5,1,2,3,4,5}
+    table.findremove(t, 2)
+    assert(table.equal(t, {1,3,4,5,1,3,4,5}))
+    table.findremove(t, 5)
+    assert(table.equal(t, {1,3,4,1,3,4}))
+    table.findremove(t, 1)
+    assert(table.equal(t, {3,4,3,4}))
+end
+
+function unittests.queues()
+    local q = queue.create()
+    assert(q.head == 1000000)
+    assert(q.tail == 1000000)
+    assert(queue.size(q) == 0)
+    assert(table.count(q) == 2)
+    queue.push(q, 27)
+    assert(queue.size(q) == 1)
+    queue.push(q, 45)
+    assert(queue.nth(q, 1) == 27)
+    assert(queue.nth(q, 2) == 45)
+    assert(queue.size(q) == 2)
+    assert(table.count(q) == 4)
+    assert(queue.pop(q) == 27)
+    assert(queue.size(q) == 1)
+    assert(table.count(q) == 3)
+    assert(queue.pop(q) == 45)
+    assert(queue.size(q) == 0)
+    assert(table.count(q) == 2)
+    assert(queue.pop(q) == nil)
+    assert(table.count(q) == 2)
+    assert(q.head == 1000002)
+    assert(q.tail == 1000002)
+    assert(queue.size(q) == 0)
+end