Wreck : 1 version importée

2026-02-22T15:16:10Z

1 version importée

← Version précédente	Version du 22 février 2026 à 17:16
(Aucune différence)

Nirvana>Od1n : trim trailing spaces

2025-04-29T13:16:10Z

trim trailing spaces

Nouvelle page

--Module appliquant aux fonctions de la librairie Table une inteface fluide.

local meta = {

insert = function ( t, ... )
table.insert( t, ... )
return t
end,

remove = function ( t, ... )
table.remove( t, ... )
return t
end,

sort = function ( t, ... )
table.sort( t, ... )
return t
end,

maxn = function ( t )
return table.maxn( t )
end,

concat = function ( t, ... )
return table.concat( t, ... )
end,

minsert = function( t, ... )
for i = 1, select( '#', ... ) do
local sel = select( i, ... )
if sel then
t[#t+1] = sel
end
end
return t
end,

tinsert = function( t, tab, first, last )
if type( tab ) == 'table' then
for i = ( tonumber( first ) or 1 ), ( tonumber( last ) or #tab ) do
t[#t+1] = tab[i]
end
end
return t
end,
}

meta.__index = function ( t, key )
local metafunc = meta[key]
if type( metafunc ) == 'function' then
return function ( ... ) return metafunc( t, ... ) end
end
end

-- fin des fonctions de la meta-table

local TableBuilder = {
new = function( ... )
local t = { ... }
setmetatable( t, meta )
return t
end,

set = function( t )
if type( t ) == 'table' then
setmetatable( t, meta )
end
return t
end,

clone = function ( t )
local tableRefs = { }
local function recursiveClone( val )
if type( val ) == 'table' then
-- Encode circular references correctly
if tableRefs[val] ~= nil then
return tableRefs[val]
end

local retVal = { }
tableRefs[val] = setmetatable( retVal, meta )

for key, elt in pairs( val ) do
retVal[key] = recursiveClone( elt )
end
return retVal
else
return val
end
end
return recursiveClone( t )
end,
}

return TableBuilder

Module:TableBuilder - Historique des versions

Wreck : 1 version importée

Nirvana>Od1n : trim trailing spaces

Wreck : 1 version importée

Nirvana>Od1n : trim trailing spaces