64628c1757
Almost old gc api, but: rebased on new master GC::State -> enabled_ flag release lua state as soon as possible
50 lines
1.3 KiB
Lua
Executable File
50 lines
1.3 KiB
Lua
Executable File
#!/usr/bin/env lua
|
|
|
|
-- TODO: remove hardcode
|
|
package.path = package.path .. ";../libs/luaunit/?.lua;../tests/lua/?.lua"
|
|
|
|
print("---------------")
|
|
print("-- " .. _VERSION .. " --")
|
|
print("---------------")
|
|
|
|
do
|
|
-- Hack input arguments to make tests verbose by default
|
|
local found = false
|
|
for _, v in ipairs(arg) do
|
|
if v == '-o' or v == '--output' then
|
|
found = true
|
|
break
|
|
end
|
|
end
|
|
if not found then
|
|
table.insert(arg, '-o')
|
|
table.insert(arg, 'TAP')
|
|
end
|
|
end
|
|
|
|
-----------
|
|
-- TESTS --
|
|
-----------
|
|
|
|
test = require "luaunit"
|
|
effil = require 'effil'
|
|
require 'test_utils'
|
|
require 'thread'
|
|
require 'shared_table'
|
|
require 'gc'
|
|
|
|
-- Hack tests functions to print when test starts
|
|
for suite_name, suite in pairs(_G) do
|
|
if string.sub(suite_name, 1, 4):lower() == 'test' and type(_G[suite_name]) == 'table' then -- is a test suite
|
|
for test_name, test_func in pairs(suite) do
|
|
if string.sub(test_name, 1, 4):lower() == 'test' then -- is a test function
|
|
suite[test_name] = function(...)
|
|
print("# Starting test: " .. suite_name .. '.' .. test_name)
|
|
return test_func(...)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
os.exit( test.LuaUnit.run() ) |