simple vararg lib

varg.lua

local unpack = unpack or table.unpack
local select = select

local varg_internal_meta = {}
local varg = setmetatable({},varg_internal_meta)

varg.meta = {}
varg.meta.__index = varg.meta

function varg.meta:Unpack(from,to)
    return unpack(self.value,from or 1,to or self.len)
end

function varg.meta:Copy()
    return varg.create(self:Unpack())
end

function varg.meta:__tostring()
    return string.format(
        "Vararg [%d args]",
        self.len
    )
end

function varg.meta:__len()
    return self.len
end

function varg.meta:__concat(varg2)
    return varg.join(self,varg2)
end

function varg.meta:__add(varg2)
    return varg.join(self,varg2)
end

function varg.join(varg1,varg2)
    local varg3 = varg1:Copy()

    varg3.len = varg1.len + varg2.len

    for i=1,varg2.len do
        varg3.value[varg1.len + i] = varg2.value[i]
    end

    return varg3
end

function varg.create(...)
    return setmetatable({
        value = {...},
        len = select("#",...),
    },varg.meta)
end

function varg_internal_meta:__call(...)
    return varg.create(...)
end

return varg