integration/luprex/core/lua/ut-table.lua

makeclass("unittests")

function cmt()
    for i=1,100000 do
        local t = {1,2,3,4,5,a=1,b=2,c=3,d=4,e=5}
        table.clear(t)
    end
end

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(queue.size(q) == 0)
    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(queue.pop(q) == 27)
    assert(queue.size(q) == 1)
    assert(queue.pop(q) == 45)
    assert(queue.size(q) == 0)
    assert(queue.pop(q) == nil)
    assert(queue.size(q) == 0)
    for i=1,50 do
        queue.push(q,i)
    end
    for i=1,50 do
        assert(queue.pop(q)==i)
    end
end