273 result_log = nil; |
273 result_log = nil; |
274 end |
274 end |
275 end |
275 end |
276 end; |
276 end; |
277 |
277 |
278 local function run_test_script(script_name) |
278 local function run_test_script(script_name, script_text) |
279 local script = parse_script(read_script(script_name)) |
279 local script = parse_script(script_text) |
280 log_data("script", { title = script.title, summary = script.summary, tags = script.tags, filename = script_name }); |
280 log_data("script", { title = script.title, summary = script.summary, tags = script.tags, filename = script_name }); |
281 |
281 |
282 local ok, result, err = pcall(main, log_data, script); |
282 local ok, result, err = pcall(main, log_data, script); |
283 |
283 |
284 local status, reason = "ok"; |
284 local status, reason = "ok"; |
298 |
298 |
299 local result_tally = { all = {} }; |
299 local result_tally = { all = {} }; |
300 |
300 |
301 assert(#files > 0, "No test script provided"); |
301 assert(#files > 0, "No test script provided"); |
302 for i = 1, #files do |
302 for i = 1, #files do |
303 local ret = run_test_script(files[i]); |
303 local script_text = read_script(files[i]); |
|
304 local ret = run_test_script(files[i], script_text); |
304 if not result_tally[ret.status] then |
305 if not result_tally[ret.status] then |
305 result_tally[ret.status] = {}; |
306 result_tally[ret.status] = {}; |
306 end |
307 end |
307 table.insert(result_tally[ret.status], ret); |
308 table.insert(result_tally[ret.status], ret); |
308 table.insert(result_tally.all, ret); |
309 table.insert(result_tally.all, ret); |