1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34
|
-- running the tests and examples
require 'pl'
local lfs = require 'lfs'
local function quote_if_needed (s)
if s:match '%s' then
s = '"'..s..'"'
end
return s
end
-- get the Lua command-line used to invoke this script
local cmd = app.lua()
function do_lua_files ()
for _,f in ipairs(dir.getfiles('.','*.lua')) do
print(cmd..' '..f)
local res = utils.execute(cmd..' '..f)
if not res then
print ('process failed with non-zero result: '..f)
os.exit(1)
end
end
end
if #arg == 0 then arg[1] = 'tests'; arg[2] = 'examples' end
for _,dir in ipairs(arg) do
print('directory',dir)
lfs.chdir(dir)
do_lua_files()
lfs.chdir('..')
end
|