blob: dcf1e82bb9aef0f98ad7e784238f5526d8f70485 (
plain)
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
|
function main(t, message, funcs_or_filename, abort_reason)
local funcs = nil
if type(funcs_or_filename) == "function" then
funcs = { debug.getinfo(funcs_or_filename) }
elseif type(funcs_or_filename) == "table" then
funcs = {}
for _, v in ipairs(funcs_or_filename) do
table.insert(funcs, debug.getinfo(v))
end
else
assert(type(funcs_or_filename) == "string")
funcs = {}
local uplevel = 2
local func = nil
repeat
func = debug.getinfo(uplevel)
if (func and func.source:endswith(funcs_or_filename)) then
table.insert(funcs, func)
end
uplevel = uplevel + 1
until func == nil
end
cprint(">> ${red}test failed:${reset} %s", message)
for _, func in ipairs(funcs) do
local line = (func.currentline >= 0) and func.currentline or func.linedefined
local name = (func.func == t.func) and t.funcname or func.name or "(anonymous)"
cprint(">> function %s ${underline}%s${reset}:${bright}%d${reset}", name, func.source, line)
end
raise("aborting because of ${red}%s${reset} ...", abort_reason or "failed assertion")
end
|
