|
1234567891011121314151617181920212223 |
- function loadfile(p) -- reads file *p* and returns a function if possible
- local f = fs.open(p,"rb")
- local c = f:read("*a")
- f:close()
- return load(c,p,"t")
- end
- function runfile(p,...) -- runs file *p* with arbitrary arguments in the current thread
- return loadfile(p)(...)
- end
- function spawnfile(p,n) -- spawns a new process from file *p* with name *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
|