lua-iconv/makestr.lua
Alexandre Erwin Ittner ec5bf22d3a Updating for Lua 5.1
git-svn-id: file:///var/svn/lua-iconv/trunk@26 9538949d-8f27-0410-946f-ce01ef448559
2006-04-21 14:34:44 +00:00

19 lines
355 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 xxxxxxxxxxx = \""
for i = 1, string.len(str) do
ostr = ostr .. "\\" .. string.byte(string.sub(str, i, i+1))
if string.len(ostr) > 72 then
io.write(ostr .. "\"\n")
ostr = ".. \""
end
end
io.write(ostr .. "\"\n")