加载文件并返回其环境

Question

我正在尝试执行以下操作：（包含下面的（）代码）

文件1.lua

A = 5

文件2.lua

file1 = include(File1.lua)
A = 1
print(A) -- 1
print(file1.A) -- 5

我已经找到了我想要的东西，但在lua 5.1中：加载文件而不污染全球环境

但我就是不能让它在5.2中工作，

function include(scriptfile)
local env = setmetatable({}, {__index=_G})
assert(pcall(setfenv(assert(loadfile(scriptfile)), env)))
setmetatable(env, nil)
return env 
end

使用C++中的这个，带有loadfile的注册版本，所以我尽量不修改函数调用。这可能吗？无论我尝试什么都会中断或env为空。

Answer 1

File2.lua

function include(scriptfile)
    local env = setmetatable({}, {__index=_G})
    assert(loadfile(scriptfile, 't', env))()
    return setmetatable(env, nil)
end
file1 = include'File1.lua'
A = 1
print(A)       -- 1
print(file1.A) -- 5