From 16e4920a632a4a7981381955bb4f35ae46565c96 Mon Sep 17 00:00:00 2001
From: Philipp Gesang <pgesang@ix.urz.uni-heidelberg.de>
Date: Sat, 17 Apr 2010 17:16:05 +0200
Subject: =?UTF-8?q?using=20metatables=20for=20table=20generation,=20allowi?=
 =?UTF-8?q?ng=20=E2=80=9Caddition=E2=80=9D=20of=20dictionaries?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 .../third/transliterator/trans_tables_gr.lua       | 32 +++++++++++-----------
 1 file changed, 16 insertions(+), 16 deletions(-)

(limited to 'tex/context/third/transliterator/trans_tables_gr.lua')

diff --git a/tex/context/third/transliterator/trans_tables_gr.lua b/tex/context/third/transliterator/trans_tables_gr.lua
index 7ce6855..bed775a 100644
--- a/tex/context/third/transliterator/trans_tables_gr.lua
+++ b/tex/context/third/transliterator/trans_tables_gr.lua
@@ -16,7 +16,7 @@
 -- Lowercase Greek Initial Position Diphthongs --
 -------------------------------------------------
 
-translit.gr_di_in_low = {
+translit.gr_di_in_low = translit.make_add_dict{
   [" αὑ"] = " hau",
   [" αὕ"] = " hau",
   [" αὓ"] = " hau",
@@ -45,7 +45,7 @@ translit.tables["Greek transliteration initial breathing diphthongs lowercase"]
 -- Uppercase Greek Initial Position Diphthongs --
 -------------------------------------------------
 
-translit.gr_di_in_upp = {
+translit.gr_di_in_upp = translit.make_add_dict{
   [" Αὑ"] = " Hau",
   [" Αὕ"] = " Hau",
   [" Αὓ"] = " Hau",
@@ -74,7 +74,7 @@ translit.tables["Greek transliteration initial breathing diphthongs uppercase"]
 -- Lowercase Greek Initial Position  --
 ---------------------------------------
 
-translit.gr_in_low = {
+translit.gr_in_low = translit.make_add_dict{
   [" ἁ"] = " ha",
   [" ἅ"] = " ha",
   [" ἃ"] = " ha",
@@ -121,7 +121,7 @@ translit.tables["Greek transliteration initial breathing lowercase"] = translit.
 -- Uppercase Greek Initial Position  --
 ---------------------------------------
 
-translit.gr_in_upp = {
+translit.gr_in_upp = translit.make_add_dict{
   [" Ἁ"] = " Ha",
   [" Ἅ"] = " Ha",
   [" Ἃ"] = " Ha",
@@ -168,7 +168,7 @@ translit.tables["Greek transliteration initial breathing uppercase"] = translit.
 -- Lowercase Greek Diphthongs  --
 ---------------------------------
 
-translit.gr_di_low = {
+translit.gr_di_low = translit.make_add_dict{
   ["αυ"] = "au",
   ["αύ"] = "au",
   ["αὺ"] = "au",
@@ -240,7 +240,7 @@ translit.tables["Greek transliteration diphthongs lowercase"] = translit.gr_in_l
 -- Uppercase Greek Diphthongs  --
 ---------------------------------
 
-translit.gr_di_upp = {
+translit.gr_di_upp = translit.make_add_dict{
   ["Αυ"] = "Au",
   ["Αύ"] = "Au",
   ["Αὺ"] = "Au",
@@ -309,7 +309,7 @@ translit.tables["Greek transliteration diphthongs uppercase"] = translit.gr_in_u
 
 -- The following will be used in an option that ensures transcription of
 -- nasalization, e.g. Ἁγχίσης -> “Anchises” (instead of “Agchises”)
-translit.gr_nrule = {
+translit.gr_nrule = translit.make_add_dict{
   ["γγ"] = "ng",
   ["γκ"] = "nk",
   ["γξ"] = "nx",
@@ -323,7 +323,7 @@ translit.tables["Greek transliteration optional nasalization"] = translit.gr_nru
 -- Lowercase Greek Transliteration  --
 --------------------------------------
 
-translit.gr_low = {
+translit.gr_low = translit.make_add_dict{
   ["α"] = "a",
   ["ά"] = "a",
   ["ὰ"] = "a",
@@ -475,7 +475,7 @@ translit.tables["Greek transliteration lowercase"] = translit.gr_low
 -- Uppercase Greek Transliteration  --
 --------------------------------------
 
-translit.gr_upp = {
+translit.gr_upp = translit.make_add_dict{
   ["Α"] = "A",
   ["Ά"] = "A",
   ["Ὰ"] = "A",
@@ -627,7 +627,7 @@ translit.tables["Greek transliteration uppercase"] = translit.gr_upp
 -- Varia  --
 ------------
 
-translit.gr_other = {
+translit.gr_other = translit.make_add_dict{
   ["ϝ"] = "w",
   ["Ϝ"] = "W",
   ["ϙ"] = "q",
@@ -664,13 +664,13 @@ function translit.dogreek (mode, text)
 
     if mode == "gr" or mode == "gr_n" then
 
-        local gr_di_in, gr_in, gr_di, gr = {}, {}, {}, {}
-        gr_di_in = translit.add_table( gr_di_in,    translit.gr_di_in_low,  translit.gr_di_in_upp   )
-        gr_in    = translit.add_table( gr_in,       translit.gr_in_low,     translit.gr_in_upp      )
-        gr_di    = translit.add_table( gr_di,       translit.gr_di_low,     translit.gr_di_upp      )
-        gr       = translit.add_table( gr,          translit.gr_low,        translit.gr_upp         , translit.gr_other)
+        local gr_di_in, gr_in, gr_di, gr = translit.make_add_dict{}, translit.make_add_dict{}, translit.make_add_dict{}, translit.make_add_dict{}
+        gr_di_in = gr_di_in +   translit.gr_di_in_low + translit.gr_di_in_upp
+        gr_in    = gr_in +      translit.gr_in_low +    translit.gr_in_upp
+        gr_di    = gr_di +      translit.gr_di_low +    translit.gr_di_upp
+        gr       = gr +         translit.gr_low +       translit.gr_upp +         translit.gr_other
 
-        if mode == "gr_n" then gr_di = translit.add_table( gr_di,           translit.gr_nrule       ) end
+        if mode == "gr_n" then gr_di = gr_di +          translit.gr_nrule         end
 
         local p_di_in, p_in, p_di, p
 
-- 
cgit v1.2.3