From 26ae25dbea9b066eae665f8aefb2b046ac67d431 Mon Sep 17 00:00:00 2001 From: Philipp Gesang Date: Fri, 24 Dec 2010 14:48:09 +0100 Subject: =?UTF-8?q?using=20context=E2=80=99s=20builtin=20pattern=20for=20u?= =?UTF-8?q?tf8=20characters?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- tex/context/third/transliterator/transliterator.lua | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'tex/context/third/transliterator/transliterator.lua') diff --git a/tex/context/third/transliterator/transliterator.lua b/tex/context/third/transliterator/transliterator.lua index 4b64d82..110d862 100644 --- a/tex/context/third/transliterator/transliterator.lua +++ b/tex/context/third/transliterator/transliterator.lua @@ -80,6 +80,19 @@ end -- Auxiliary Functions -------------------------------------------------------------------------------- +-- Generate a rule pattern from hash table. +do + local P = lpeg.P + function translit.addrules (dict, rules) + for i, _ in pairs(dict) do + if rules == nil then rules = P(i) + else rules = rules + P(i) + end + end + return rules + end +end + -- We might want to have all the table data nicely formatted by \CONTEXT\ -- itself, here's how we'll do it. \type{translit.show_tab(t)} handles a -- single table \type{t}, builds a Natural TABLE out of its content and -- cgit v1.2.3