tablecopy.lua

-- "copies" is an internal parameter
function table:deepcopy(copies)
	if type(self) ~= "table" then
 		return self
	end
	local t = {}
	copies = copies or {}
	copies[self] = t
	for k, v in pairs(self) do
		t[copies[k] or table.deepcopy(k, copies)] = copies[v] or table.deepcopy(v, copies)
	end
	return t 
end

function table:shallowcopy()
	local t = {}
	for k, v in pairs(self) do
		t[k] = v
	end
	return t
end

tablecopy.min.lua

local k,o,d=next,type d=function(a,r,t)if o{}~=o(a)then return a end t={}r=r or{}r[a]=t for x,y in k,a do t[r[x]or d(x,r)]=r[y]or d(y,r)end return t end table.copy={shallow=function(a,b)b={}for x,y in k,a do b[x]=y end return b end,deep=d}