summaryrefslogtreecommitdiff
path: root/tex/context/third/transliterator/transliterator.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/third/transliterator/transliterator.lua')
-rw-r--r--tex/context/third/transliterator/transliterator.lua13
1 files changed, 13 insertions, 0 deletions
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