Lua 弱引用

-- __mode 字段 'k' 'v'
a = {}
b = { __mode = "k" }
setmetatable( a , b )    -- 现在 'a' 的 key 就是弱应用
key = {}   -- 创建第一个key
a[key] = 1
key = {}  -- 创建第二个key
a[key] = 2
collectgarbage()  -- 强制进行一次垃圾收集 第一个key被回收了
for k , v in pairs(a) do
print(v)
end

local results = {}
function mem_loadstring(s)
local res = results[s]
if res == nil then  -- 是否已记录过
    res = assert( loadstring(s) )  -- 计算新结果
    results[s] = res  -- 存下以备之后复用
end
return res
end

function createRGB( r , g , b )
return { red = r , green = g , blue = b }
end

local results = {}
setmetatable( results , { __mode = "v" })    -- 使value成为弱应用
function createRGB(r , g , b)
local key = r .."-" .. g .. "-" .. b
local color = results[key]
if color == nil then
    color = { red = r , green = g , blue = b }
    results[key] = color
end
return color
end