dany/lua-iconv
1
0
Fork 0
mirror of https://github.com/lunarmodules/lua-iconv.git synced 2025-09-17 16:42:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

Updating for Lua 5.1

Browse Source 
git-svn-id: file:///var/svn/lua-iconv/trunk@26 9538949d-8f27-0410-946f-ce01ef448559
This commit is contained in:
Alexandre Erwin Ittner
2006-04-21 14:34:44 +00:00
parent 4ed127ac23
commit ec5bf22d3a
9 changed files with 92 additions and 269 deletions
Download Patch File Download Diff File Expand all files Collapse all files

43
test_iconv.lua
View File

@@ -1,27 +1,23 @@
require "iconv"
-- Set your terminal encoding here
local termcs = "iso-8859-1"
local iso88591 = [[
Ao longe, ao luar
No rio uma vela
Serena a passar,
Que <20> que me revela
N<EFBFBD>o sei, mas mue ser
Tornou-se-me estranho,
E eu sonho sem ver
Os sonhos que tenho.
Que ang<6E>stia me enla<6C>a?
Que amor n<>o se explica?
<EFBFBD> a vela que passa
Na noite que fica
-- Fernando Pessoa]]
-- local termcs = "iso-8859-1"
local termcs = "utf-8"
local iso88591 = "\65\111\32\108\111\110\103\101\44\32\97\111\32\108\117"
.. "\97\114\10\78\111\32\114\105\111\32\117\109\97\32\118\101\108\97\10\83"
.. "\101\114\101\110\97\32\97\32\112\97\115\115\97\114\44\10\81\117\101\32"
.. "\233\32\113\117\101\32\109\101\32\114\101\118\101\108\97\10\10\78\227"
.. "\111\32\115\101\105\44\32\109\97\115\32\109\117\101\32\115\101\114\10"
.. "\84\111\114\110\111\117\45\115\101\45\109\101\32\101\115\116\114\97\110"
.. "\104\111\44\10\69\32\101\117\32\115\111\110\104\111\32\115\101\109\32"
.. "\118\101\114\10\79\115\32\115\111\110\104\111\115\32\113\117\101\32\116"
.. "\101\110\104\111\46\10\10\81\117\101\32\97\110\103\250\115\116\105\97"
.. "\32\109\101\32\101\110\108\97\231\97\63\10\81\117\101\32\97\109\111\114"
.. "\32\110\227\111\32\115\101\32\101\120\112\108\105\99\97\63\10\201\32\97"
.. "\32\118\101\108\97\32\113\117\101\32\112\97\115\115\97\10\78\97\32\110"
.. "\111\105\116\101\32\113\117\101\32\102\105\99\97\10\10\32\32\32\32\45"
.. "\45\32\70\101\114\110\97\110\100\111\32\80\101\115\115\111\97\10"
local utf8 = "\65\111\32\108\111\110\103\101\44\32\97\111\32\108\117\97\114"
.. "\10\78\111\32\114\105\111\32\117\109\97\32\118\101\108\97\10\83\101\114"
@@ -81,10 +77,7 @@ local ebcdic = "\193\150\64\147\150\149\135\133\107\64\129\150\64\147\164\129"
function check_one(to, from, text)
print("\n-- Testing conversion from " .. from .. " to " .. to)
local cd = iconv.new(to .. "//TRANSLIT", from)
if not cd then
printf("FAILED!")
return
end
assert(cd, "Failed to create a converter object.")
local ostr, err = cd:iconv(text)
if err == iconv.ERROR_INCOMPLETE then
@@ -96,7 +89,6 @@ function check_one(to, from, text)
elseif err == iconv.ERROR_UNKNOWN then
print("ERROR: There was an unknown error.")
end
print(ostr)
end
@@ -105,4 +97,3 @@ check_one(termcs, "utf8", utf8)
check_one(termcs, "utf16", utf16)
check_one(termcs, "EBCDIC-CP-ES", ebcdic)