lua-iconv/makestr.lua
Alexandre Erwin Ittner 6b2b43d283 *** empty log message ***
git-svn-id: file:///var/svn/lua-iconv/trunk@18 9538949d-8f27-0410-946f-ce01ef448559
2005-09-18 17:46:53 +00:00

19 lines
349 B
Lua

local fp = assert(io.open(arg[1], "rb"))
local str = assert(fp:read("*a"))
fp:close()
local i
local c = 0
local ostr = "local xxxxx = \""
for i = 1, string.len(str) do
ostr = ostr .. "\\" .. string.byte(string.sub(str, i, i+1))
if string.len(ostr) > 74 then
io.write(ostr .. "\"\n")
ostr = ".. \""
end
end
io.write(ostr .. "\"\n")