forked from osmarks/potatOS
60 lines
1.3 KiB
Lua
60 lines
1.3 KiB
Lua
|
-- Adapted from Yueliang
|
||
|
|
|
||
|
|
package.path = "../?.lua;" .. package.path
|
||
|
|
local util = require'Util'
|
||
|
|
local Parser = require'ParseLua'
|
||
|
|
local Format = require'FormatBeautiful'
|
||
|
|
|
||
|
|
for w in io.lines("test_lines.txt") do
|
||
|
|
--print(w)
|
||
|
|
local success, ast = Parser.ParseLua(w)
|
||
|
|
if w:find("FAIL") then
|
||
|
|
--[[if success then
|
||
|
|
print("ERROR PARSING LINE:")
|
||
|
|
print("Should fail: true. Did fail: " .. tostring(not success))
|
||
|
|
print("Line: " .. w)
|
||
|
|
else
|
||
|
|
--print("Suceeded!")
|
||
|
|
end]]
|
||
|
|
else
|
||
|
|
if not success then
|
||
|
|
print("ERROR PARSING LINE:")
|
||
|
|
print("Should fail: false. Did fail: " .. tostring(not success))
|
||
|
|
print("Line: " .. w)
|
||
|
|
else
|
||
|
|
success, ast = Format(ast)
|
||
|
|
--print(success, ast)
|
||
|
|
if not success then
|
||
|
|
print("ERROR BEAUTIFYING LINE:")
|
||
|
|
print("Message: " .. ast)
|
||
|
|
print("Line: " .. w)
|
||
|
|
end
|
||
|
|
local success_ = success
|
||
|
|
success, ast = loadstring(success)
|
||
|
|
if not success then
|
||
|
|
print("ERROR PARSING BEAUTIFIED LINE:")
|
||
|
|
print("Message: " .. ast)
|
||
|
|
print("Line: " .. success_)
|
||
|
|
end
|
||
|
|
--print("Suceeded!")
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
print"Done!"
|
||
|
|
os.remove("tmp")
|
||
|
|
|
||
|
|
|
||
|
|
--[[
|
||
|
|
function readAll(file)
|
||
|
|
local f = io.open(file, "rb")
|
||
|
|
local content = f:read("*all")
|
||
|
|
f:close()
|
||
|
|
return content
|
||
|
|
end
|
||
|
|
|
||
|
|
local text = readAll('../ParseLua.lua')
|
||
|
|
local success, ast = Parser.ParseLua(text)
|
||
|
|
local nice
|
||
|
|
nice = Format(ast)
|
||
|
|
print(nice)
|
||
|
|
--]]
|