From c648ccf7728650440b6d7046211128a58ddbbc5f Mon Sep 17 00:00:00 2001 From: Philipp Gesang Date: Wed, 29 Dec 2010 00:00:16 +0100 Subject: restructured main transliteration procedure to not redundantly reload tables --- tex/context/third/transliterator/trans_tables_scntfc.lua | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'tex/context/third/transliterator/trans_tables_scntfc.lua') diff --git a/tex/context/third/transliterator/trans_tables_scntfc.lua b/tex/context/third/transliterator/trans_tables_scntfc.lua index 0a24130..9de4b96 100644 --- a/tex/context/third/transliterator/trans_tables_scntfc.lua +++ b/tex/context/third/transliterator/trans_tables_scntfc.lua @@ -200,7 +200,7 @@ end -- End Of Tables -- --===========================================================================-- -function translit.scientific (mode, text) +local function scientific (mode, text) local P, Cs = lpeg.P, lpeg.Cs local utfchar = translit.utfchar local addrules = translit.addrules @@ -250,3 +250,8 @@ function translit.scientific (mode, text) return scientific_parser:match(text) end + +translit.methods ["iso9_ocs"] = function (text) return scientific( "iso9_ocs" , text ) end +translit.methods ["iso9_ocs_hack"] = function (text) return scientific( "iso9_ocs_hack", text ) end +translit.methods ["ocs"] = function (text) return scientific( "ocs" , text ) end +translit.methods ["ocs_gla"] = function (text) return scientific( "ocs_gla" , text ) end -- cgit v1.2.3