mirror of
https://github.com/Reuh/candran.git
synced 2025-10-27 17:59:30 +00:00
2a1e293aa5
Changed a LOT. Notable changes: * Removed decorators, as they're not that useful, unless rewriting most Lua libraries API. * Added functions parameters default values. * Added Lua 5.3 stuff and building to Lua 5.1. * Remplaced the LuaMinify parser by lua-parser. It now requires some non-Lua dependencies (LPeg) unfortunately, but it's waaaaaay easier to handle. Code should be adaptable to any Metalua-like AST generator anyway. * The generated code now look like shit, and comment are stripped, because the parser ignore them. Oh well. * Changed a few things in the preprocessor environment. * Nobody will read this commit message I guess. If you did, create an issue saying "I love pineapple flavored bread".
145 lines
2.9 KiB
Lua
145 lines
2.9 KiB
Lua
print("========================")
|
|
print("|| CANDRAN TESTS ||")
|
|
print("========================")
|
|
|
|
local candran = dofile(arg[1] or "../candran.lua")
|
|
|
|
-- test helper
|
|
local results = {} -- tests result
|
|
local function test(name, candranCode, result, args)
|
|
results[name] = { result = "not finished", message = "no info" }
|
|
local self = results[name]
|
|
|
|
-- make code
|
|
local success, code = pcall(candran.make, candranCode, args)
|
|
if not success then
|
|
self.result = "error"
|
|
self.message = "error while making code :\n"..code
|
|
return
|
|
end
|
|
|
|
-- load code
|
|
local success, func = pcall(loadstring or load, code)
|
|
if not success then
|
|
self.result = "error"
|
|
self.message = "error while loading code :\n"..func
|
|
return
|
|
end
|
|
|
|
-- run code
|
|
local success, output = pcall(func)
|
|
if not success then
|
|
self.result = "error"
|
|
self.message = "error while running code :\n"..output
|
|
return
|
|
end
|
|
|
|
-- check result
|
|
if output ~= result then
|
|
self.result = "fail"
|
|
self.message = "invalid result from the code; it returned "..tostring(output).." instead of "..tostring(result)
|
|
return
|
|
else
|
|
self.result = "success"
|
|
return
|
|
end
|
|
end
|
|
|
|
-- tests
|
|
print("Running tests...")
|
|
|
|
test("preprocessor", [[
|
|
#local foo = true
|
|
return true
|
|
]], true)
|
|
test("preprocessor condition", [[
|
|
#local foo = true
|
|
#if not foo then
|
|
return false
|
|
#else
|
|
return true
|
|
#end
|
|
]], true)
|
|
test("preprocessor args table", [[
|
|
#if not foo == "sky" then
|
|
# error("Invalid foo argument")
|
|
#end
|
|
return true
|
|
]], true, { foo = "sky" })
|
|
test("preprocessor write function", [[
|
|
#write("local a = true")
|
|
return a
|
|
]], true)
|
|
test("preprocessor import function", [[
|
|
#import("toInclude")
|
|
return toInclude
|
|
]], 5)
|
|
test("preprocessor include function", "a = [[\n#include('toInclude.lua')\n]]\nreturn a",
|
|
"local a = 5\nreturn a\n\n")
|
|
|
|
test("+=", [[
|
|
local a = 5
|
|
a += 2
|
|
return a
|
|
]], 7)
|
|
test("-=", [[
|
|
local a = 5
|
|
a -= 2
|
|
return a
|
|
]], 3)
|
|
test("*=", [[
|
|
local a = 5
|
|
a *= 2
|
|
return a
|
|
]], 10)
|
|
test("/=", [[
|
|
local a = 5
|
|
a /= 2
|
|
return a
|
|
]], 5/2)
|
|
test("^=", [[
|
|
local a = 5
|
|
a ^= 2
|
|
return a
|
|
]], 25)
|
|
test("%=", [[
|
|
local a = 5
|
|
a %= 2
|
|
return a
|
|
]], 5%2)
|
|
test("..=", [[
|
|
local a = "hello"
|
|
a ..= " world"
|
|
return a
|
|
]], "hello world")
|
|
test("default parameters", [[
|
|
local function test(hey, def="re", no, foo=("bar"):gsub("bar", "batru"))
|
|
return def..foo
|
|
end
|
|
return test(78, "SANDWICH", true)
|
|
]], "SANDWICHbatru")
|
|
|
|
-- results
|
|
print("=====================")
|
|
print("|| RESULTS ||")
|
|
print("=====================")
|
|
|
|
local resultCounter = {}
|
|
local testCounter = 0
|
|
for name, test in pairs(results) do
|
|
-- print errors & fails
|
|
if test.result ~= "success" then
|
|
print("Test \""..name.."\" : "..test.result)
|
|
if test.message then print(test.message) end
|
|
print("----------")
|
|
end
|
|
-- count tests results
|
|
resultCounter[test.result] = (resultCounter[test.result] or 0) + 1
|
|
testCounter = testCounter + 1
|
|
end
|
|
|
|
-- print final results
|
|
for name, count in pairs(resultCounter) do
|
|
print(count.." "..name.." (" .. math.floor((count / testCounter * 100)*100)/100 .. "%)")
|
|
end
|
|
print(testCounter.." total")
|