forked from mia/Aegisub
30 lines
499 B
Lua
30 lines
499 B
Lua
--- Luabins format checker
|
|
|
|
package.cpath = "./lib/?.so;"..package.cpath
|
|
|
|
local luabins = require("luabins")
|
|
|
|
local luabins_save, luabins_load = luabins.save, luabins.load
|
|
|
|
local filename = select(1, ...)
|
|
assert(filename, "Usage: lua checkfmt.lua <out_filename>")
|
|
|
|
local file
|
|
if filename == "-" then
|
|
file = io.stdin
|
|
else
|
|
file = assert(io.open(filename, "r"))
|
|
end
|
|
|
|
assert(
|
|
luabins_load(
|
|
file:read("*a")
|
|
)
|
|
)
|
|
|
|
if file ~= io.stdin then
|
|
file:close()
|
|
end
|
|
file = nil
|
|
|
|
print("OK")
|