lihao/skynet
1
0
Fork 0
mirror of https://github.com/cloudwu/skynet.git synced 2026-07-22 02:53:09 +00:00
Code Issues Packages Projects Releases Wiki Activity

loadx for compat lua 5.1

Browse Source
This commit is contained in:
云风
2012-09-12 20:57:03 +08:00
parent 1b5d82820b
commit 374b65d199
1 changed files with 4 additions and 53 deletions
Download Patch File Download Diff File Expand all files Collapse all files

57
lualib/loadx.lua
View File

@@ -1,44 +1,4 @@
local cookie
local function make_ld(ld)
local load_cookie
return function()
if load_cookie then
return ld()
else
load_cookie = true
return cookie
end
end
end
if _VERSION == "Lua 5.2" then
cookie = "local function __setenv() end;"
local load = load
function _G.load(ld, chunkname, mode, env)
local f,err
if type(ld) == "string" then
f,err = load(cookie .. ld, chunkname, mode, env)
else
f,err = load(make_ld(ld), chunkname)
end
return f,err
end
function _G.loadfile(filename, mode, env)
local f = io.open(filename, "rb")
assert(f, filename)
local source = f:read "*a"
f:close()
return _G.load(source, "@" .. filename, mode, env)
end
_G.loadstring = _G.load
return
end
@@ -47,17 +7,10 @@ local assert = assert
assert(_VERSION == "Lua 5.1")
local setfenv = setfenv
local getfenv = getfenv
local loadstring = loadstring
local load = load
local io = io
local function __setenv(env)
setfenv(2,env)
end
cookie = "local _ENV,__setenv = __getenv();"
function _G.load(ld, chunkname, mode, env)
local f,err
if type(ld) == "string" then
@@ -68,11 +21,9 @@ function _G.load(ld, chunkname, mode, env)
if f == nil then
return f, err
end
env = env or getfenv(1)
setfenv(f, { __getenv = function()
setfenv(2, env)
return env, __setenv
end })
if env then
setfenv(f, env)
end
return f,err
end
@@ -86,4 +37,4 @@ function _G.loadfile(filename, mode, env)
end
_G.loadstring = _G.load
_G._ENV = _G