53 lines
1.6 KiB
Lua
53 lines
1.6 KiB
Lua
-- Licensed to the Apache Software Foundation (ASF) under one or more
|
|
-- contributor license agreements. See the NOTICE file distributed with
|
|
-- this work for additional information regarding copyright ownership.
|
|
-- The ASF licenses this file to You under the Apache License, Version 2.0
|
|
-- (the "License"); you may not use this file except in compliance with
|
|
-- the License. You may obtain a copy of the License at
|
|
--
|
|
-- http://www.apache.org/licenses/LICENSE-2.0
|
|
--
|
|
-- Unless required by applicable law or agreed to in writing, software
|
|
-- distributed under the License is distributed on an "AS IS" BASIS,
|
|
-- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
-- See the License for the specific language governing permissions and
|
|
-- limitations under the License.
|
|
|
|
module("moonunit", package.seeall)
|
|
|
|
TestCase = {}
|
|
|
|
function TestCase:new(it)
|
|
it = it or {}
|
|
setmetatable(it, self)
|
|
self.__index = self
|
|
return it
|
|
end
|
|
|
|
function TestCase:run(args)
|
|
args = args or arg
|
|
local function run_test(t, name)
|
|
local status, err = pcall(t, self)
|
|
if status then
|
|
print(("%-39s \27[32mpass\27[39m"):format("[" .. name .. "]"))
|
|
else
|
|
print(("%-39s \27[31mFAIL\27[39m %s"):format("[" .. name .. "]", err))
|
|
end
|
|
end
|
|
|
|
if (args and #args > 0) then
|
|
for _, v in ipairs(args) do
|
|
if type(self[v]) == "function" then
|
|
run_test(self[v], v)
|
|
else
|
|
print(("%-39s FAIL %s"):format("[" .. v .. "]",
|
|
"'" .. v .. "' doesn't appear to be a test function"))
|
|
end
|
|
end
|
|
else
|
|
for k, v in pairs(self) do
|
|
run_test(v, k)
|
|
end
|
|
end
|
|
end
|