tests for known input

gistfile1.lua

function test_basic_encoding_for_known_case()
    local ints = {1, 0, 2, 2, 2, 2, 2, 2, 3, 3, 3, 4}
    local res = rle.encode(ints)
    local expected = {1, 0, 0, 0, 6, 2, 3, 3, 3, 4}

    for i=1,#expected do
        assert_equal(expected[i], res[i])
    end
end

function test_basic_decoding_for_known_case()
    local packed = {1, 0, 0, 0, 6, 2, 3, 3, 3, 4}
    local expected = {1, 0, 2, 2, 2, 2, 2, 2, 3, 3, 3, 4}
    local res = rle.decode(packed)
    
    for i=1,#expected do
        assert_equal(expected[i], res[i])
    end
end