commented loadfile-related functions, added require()

This commit is contained in:
Izaya 2019-01-08 18:01:07 +11:00
parent 2c772b2987
commit d9cc184f84
1 changed files with 16 additions and 5 deletions

View File

@ -1,12 +1,23 @@
function loadfile(p) function loadfile(p) -- reads file *p* and returns a function if possible
local f = fs.open(p,"rb") local f = fs.open(p,"rb")
local c = f:read("*a") local c = f:read("*a")
f:close() f:close()
return load(c,p,"t") return load(c,p,"t")
end end
function runfile(p,...) function runfile(p,...) -- runs file *p* with arbitrary arguments in the current thread
loadfile(p)(...) return loadfile(p)(...)
end end
function spawnfile(p,n) function spawnfile(p,n) -- spawns a new process from file *p* with name *n*
os.spawn(loadfile(p),n) return os.spawn(loadfile(p),n)
end
function require(f) -- searches for a library with name *f* and returns what the library returns, if possible
local lib = os.getenv("LIB") or "/boot/lib"
for d in lib:gmatch("[^\n]+") do
if fs.exists(d.."/"..f) then
return runfile(d.."/"..f)
elseif fs.exists(d.."/"..f..".lua") then
return runfile(d.."/"..f..".lua")
end
end
error("library not found: "..f)
end end