aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRobert Alessi <alessi@robertalessi.net>2016-02-25 20:12:36 +0100
committerRobert Alessi <alessi@robertalessi.net>2016-02-25 20:12:36 +0100
commitf2911c64dda6d51f87791942660689e6d782b1f6 (patch)
tree9807f2d758f7388c82623a0b28e45b6a49cb6b43
parente6e9907b9256b51381c391cf57564cd6f2fa044e (diff)
downloadarabluatex-f2911c64dda6d51f87791942660689e6d782b1f6.tar.gz
add hamza + sukūn in fullvoc tables
-rw-r--r--arabluatex.lua4
-rw-r--r--arabluatex_fullvoc.lua13
2 files changed, 9 insertions, 8 deletions
diff --git a/arabluatex.lua b/arabluatex.lua
index 76d61b3..f1aeda0 100644
--- a/arabluatex.lua
+++ b/arabluatex.lua
@@ -143,8 +143,8 @@ local function fullvoc(str)
143 for i = 1,#tanwin do 143 for i = 1,#tanwin do
144 inside = string.gsub(inside, tanwin[i].a, tanwin[i].b) 144 inside = string.gsub(inside, tanwin[i].a, tanwin[i].b)
145 end 145 end
146 for i = 1,#trigraphs do 146 for i = 1,#trigraphsfv do
147 inside = string.gsub(inside, trigraphs[i].a, trigraphs[i].b) 147 inside = string.gsub(inside, trigraphsfv[i].a, trigraphsfv[i].b)
148 end 148 end
149 for i = 1,#digraphsfv do 149 for i = 1,#digraphsfv do
150 inside = string.gsub(inside, digraphsfv[i].a, digraphsfv[i].b) 150 inside = string.gsub(inside, digraphsfv[i].a, digraphsfv[i].b)
diff --git a/arabluatex_fullvoc.lua b/arabluatex_fullvoc.lua
index 1b72388..42063ec 100644
--- a/arabluatex_fullvoc.lua
+++ b/arabluatex_fullvoc.lua
@@ -64,7 +64,7 @@ raw = {
64 {a="i", b="ِ"} 64 {a="i", b="ِ"}
65} 65}
66 66
67-- this will eventually be new 67-- this is new
68hamzafv = { 68hamzafv = {
69 -- initial long u 69 -- initial long u
70 {a="%'%_U", b="أU"}, 70 {a="%'%_U", b="أU"},
@@ -101,12 +101,13 @@ hamzafv = {
101 {a="(i)(')([aA])", b="%1ئ%3"}, 101 {a="(i)(')([aA])", b="%1ئ%3"},
102 {a="(i)(')([uU])", b="%1ئ%3"}, 102 {a="(i)(')([uU])", b="%1ئ%3"},
103 {a="(i)(')([iI])", b="%1ئ%3"}, 103 {a="(i)(')([iI])", b="%1ئ%3"},
104 {a="(a)(')([^uaiUAI])", b="%1أ%3"}, 104 {a="(a)(')([^uaiUAI])", b="%1أْ%3"},
105 {a="(u)(')([^uaiUAI])", b="%1ؤ%3"}, 105 {a="(u)(')([^uaiUAI])", b="%1ؤْ%3"},
106 {a="(i)(')([^uaiUAI])", b="%1ئ%3"} 106 {a="(i)(')([^uaiUAI])", b="%1ئْ%3"}
107} 107}
108 108
109trigraphs = { -- trigraphs or more 109-- this is new
110trigraphsfv = { -- trigraphs or more
110 -- 'llatI / 'llad_I 111 -- 'llatI / 'llad_I
111 {a="^'ll(a)([%_]?[dt])", b="الّ%1%2"}, 112 {a="^'ll(a)([%_]?[dt])", b="الّ%1%2"},
112 {a="(%s)'ll(a)([%_]?[dt])", b="%1الّ%2%3"}, 113 {a="(%s)'ll(a)([%_]?[dt])", b="%1الّ%2%3"},
@@ -188,7 +189,7 @@ digraphsfv = {
188 {a="hh", b="هّ"}, 189 {a="hh", b="هّ"},
189 {a="ww", b="وّ"}, 190 {a="ww", b="وّ"},
190 {a="yy", b="يّ"}, 191 {a="yy", b="يّ"},
191 -- sukūn end 192 -- sukūn begin
192 {a="([%_%^%.]?[btjghxdrzs%`fqklmnwy])([%s])", b="%1ْ%2"}, 193 {a="([%_%^%.]?[btjghxdrzs%`fqklmnwy])([%s])", b="%1ْ%2"},
193 {a="([%_%^%.]?[btjghxdrzs%`fqklmnwy])([^%_uaiUAIًٌٍ])", b="%1ْ%2"}, 194 {a="([%_%^%.]?[btjghxdrzs%`fqklmnwy])([^%_uaiUAIًٌٍ])", b="%1ْ%2"},
194 -- sukūn end 195 -- sukūn end