Mercurial > prosody-hg

comparison tests/test_utf8.lua @ 6603:e702ae7aa3d9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge 0.10->trunk
author Matthew Wild <mwild1@gmail.com>
date Thu, 26 Mar 2015 16:49:03 +0000
parents fa6eb6fb4a80
children 9e48299799d8
comparison
equal deleted inserted replaced
6588:93423244dc5b 6603:e702ae7aa3d9
1 package.cpath = "../?.so"
2 package.path = "../?.lua";
3
4 function valid()
5 local encodings = require "util.encodings";
6 local utf8 = assert(encodings.utf8, "no encodings.utf8 module");
7
8 for line in io.lines("utf8_sequences.txt") do
9 local data = line:match(":%s*([^#]+)"):gsub("%s+", ""):gsub("..", function (c) return string.char(tonumber(c, 16)); end)
10 local expect = line:match("(%S+):");
11 if expect ~= "pass" and expect ~= "fail" then
12 error("unknown expectation: "..line:match("^[^:]+"));
13 end
14 local prefix, style = " ", valid_style;
15 local valid = utf8.valid(data);
16 assert_equal(valid, utf8.valid(data.." "));
17 assert_equal(valid, expect == "pass", line);
18 end
19 end