Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

114 lines (91 sloc) 2.741 kb
-- adjust package.path
package.path = package.path .. ";tests/?.lua"
function to_string(data, indent)
local str = ""
if(indent == nil) then
indent = 0
end
-- Check the type
if(type(data) == "string") then
str = str .. (" "):rep(indent) .. data .. "\n"
elseif(type(data) == "number") then
str = str .. (" "):rep(indent) .. data .. "\n"
elseif(type(data) == "boolean") then
if(data == true) then
str = str .. "true"
else
str = str .. "false"
end
elseif(type(data) == "table") then
local i, v
for i, v in pairs(data) do
-- Check for a table in a table
if(type(v) == "table") then
str = str .. (" "):rep(indent) .. i .. ":\n"
str = str .. to_string(v, indent + 2)
else
str = str .. (" "):rep(indent) .. i .. ": " .. to_string(v, 0)
end
end
else
return tostring(data).."\n"
end
return str
end
function pprint(data)
print(to_string(data))
end
U_PROC_META = debug.getregistry()["U_PROC_META"]
U_FLAG_META = debug.getregistry()["U_FLAG_META"]
function assert_u_proc(data)
return assert_userdata(data, "Not a u_proc object") or
assert_metatable(U_PROC_META, data, "Not a u_proc object")
end
function assert_u_flag(data)
return assert_userdata(data, "Not a u_flag object") or
assert_metatable(U_FLAG_META, data, "Not a u_flag object")
end
function assert_cmp_table(exp, val, err, ign)
for k, v in pairs(exp) do
if not ign or not ign.k then
if type(v) == "table" then
assert_cmp_table(v, val[k], "sub value in table differ", ign)
else
assert_equal(v, val[k], err or "value in table differs")
end
end
end
end
arg = {}
require('tests.lunatest')
suites = {"processes", "misc"}
loaded_suites = lunatest.get_suites()
current_id = 0
current_suite = suites[current_id]
function run_suite(bla)
while true do
if loaded_suites[current_suite] then
if loaded_suites[current_suite].test_done then
if not loaded_suites[current_suite].test_done() then
return true
end
end
end
current_id = current_id + 1
current_suite = suites[current_id]
if not current_suite then
print("all lua tests done")
ulatency.quit_daemon(0)
return false
end
lunatest.suite(current_suite)
loaded_suites = lunatest.get_suites()
lunatest.run(nil, current_suite)
if loaded_suites[current_suite].test_done then
return true
end
end
end
ulatency.add_timeout(run_suite, 500)
--ulatency.quit_daemon()
ulatency.add_timeout(ulatency.quit_daemon, 100000)
Jump to Line
Something went wrong with that request. Please try again.