From 814b93d12bc9a0792b150527495ece0847a343fc Mon Sep 17 00:00:00 2001 From: Philipp Gesang Date: Sun, 21 Nov 2021 19:22:18 +0100 Subject: reorganize source tree --- .../third/transliterator/trans_tables_bg.lua | 114 --------------------- 1 file changed, 114 deletions(-) delete mode 100644 tex/context/third/transliterator/trans_tables_bg.lua (limited to 'tex/context/third/transliterator/trans_tables_bg.lua') diff --git a/tex/context/third/transliterator/trans_tables_bg.lua b/tex/context/third/transliterator/trans_tables_bg.lua deleted file mode 100644 index b319666..0000000 --- a/tex/context/third/transliterator/trans_tables_bg.lua +++ /dev/null @@ -1,114 +0,0 @@ ---===========================================================================-- --- Bulgarian -- ---===========================================================================-- - -local translit = thirddata.translit -local pcache = translit.parser_cache -local lpegmatch = lpeg.match - -if not translit.done_bg then - --------------------------------------------------------------------------- - -- Uppercase Bulgarian -> „scientific“ transliteration -- - --------------------------------------------------------------------------- - - translit.bg_upp = translit.make_add_dict{ - ["А"] = "A", - ["Б"] = "B", - ["В"] = "V", - ["Г"] = "G", - ["Д"] = "D", - ["Е"] = "E", - ["Ж"] = "Ž", - ["З"] = "Z", - ["И"] = "I", - ["Й"] = "J", - ["К"] = "K", - ["Л"] = "L", - ["М"] = "M", - ["Н"] = "N", - ["О"] = "O", - ["П"] = "P", - ["Р"] = "R", - ["С"] = "S", - ["Т"] = "T", - ["У"] = "U", - ["Ф"] = "F", - ["Х"] = "Ch", - ["Ц"] = "C", - ["Ч"] = "Č", - ["Ш"] = "Š", - ["Щ"] = "Št", - ["Ъ"] = "Ă", - ["Ь"] = "′", - ["Ю"] = "Ju", - ["Я"] = "Ja", - } - translit.tables["Bulgarian \\quotation{scientific} transliteration uppercase"] = translit.bg_upp - - --------------------------------------------------------------------------- - -- Lowercase Bulgarian -> „scientific“ transliteration -- - --------------------------------------------------------------------------- - translit.bg_low = translit.make_add_dict{ - ["а"] = "a", - ["б"] = "b", - ["в"] = "v", - ["г"] = "g", - ["д"] = "d", - ["е"] = "e", - ["ж"] = "ž", - ["з"] = "z", - ["и"] = "i", - ["й"] = "j", - ["к"] = "k", - ["л"] = "l", - ["м"] = "m", - ["н"] = "n", - ["о"] = "o", - ["п"] = "p", - ["р"] = "r", - ["с"] = "s", - ["т"] = "t", - ["у"] = "u", - ["ф"] = "f", - ["х"] = "ch", - ["ц"] = "c", - ["ч"] = "č", - ["ш"] = "š", - ["щ"] = "št", - ["ъ"] = "ă", - ["ь"] = "′", - ["ю"] = "ju", - ["я"] = "ja", - } - - translit.tables["Bulgarian \\quotation{scientific} transliteration lowercase"] = translit.bg_low - - translit.done_bg = true -end - -local P, Cs = lpeg.P, lpeg.Cs -local addrules = translit.addrules -local utfchar = translit.utfchar - -local function bulgarian (mode) - local bulgarian_parser - if mode == "de" then - local bg = translit.bg_upp + translit.bg_low - local p_bg = addrules(bg) - bulgarian_parser = Cs((p_bg / bg + utfchar)^0) - else - return nil - end - return bulgarian_parser -end - -translit.methods["bg_de"] = function (text) - local p = pcache["bg_de"] - if not p then - p = bulgarian("de") - pcache["bg_de"] = p - end - return p and lpegmatch(p, text) or "" -end - --- vim:ft=lua:sw=4:ts=4 -- cgit v1.2.3