diff options
Diffstat (limited to 'arabluatex_novoc.lua')
-rw-r--r-- | arabluatex_novoc.lua | 45 |
1 files changed, 22 insertions, 23 deletions
diff --git a/arabluatex_novoc.lua b/arabluatex_novoc.lua index f3410e7..1800655 100644 --- a/arabluatex_novoc.lua +++ b/arabluatex_novoc.lua | |||
@@ -2,24 +2,23 @@ | |||
2 | This file is part of the `arabluatex' package | 2 | This file is part of the `arabluatex' package |
3 | 3 | ||
4 | ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX | 4 | ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX |
5 | Copyright (C) 2016--2020 Robert Alessi | 5 | Copyright (C) 2016, 2017, 2018, 2019, 2020, 2021, 2022, 2023 |
6 | Robert Alessi <alessi@robertalessi.net> | ||
6 | 7 | ||
7 | Please send error reports and suggestions for improvements to Robert | 8 | Permission to use, copy, modify, and distribute this software for any |
8 | Alessi <alessi@robertalessi.net> | 9 | purpose with or without fee is hereby granted, provided that the above |
9 | 10 | copyright notice and this permission notice appear in all copies. | |
10 | This program is free software: you can redistribute it and/or modify | ||
11 | it under the terms of the GNU General Public License as published by | ||
12 | the Free Software Foundation, either version 3 of the License, or | ||
13 | (at your option) any later version. | ||
14 | 11 | ||
15 | This program is distributed in the hope that it will be useful, but | 12 | THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
16 | WITHOUT ANY WARRANTY; without even the implied warranty of | 13 | WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
17 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | 14 | MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR |
18 | General Public License for more details. | 15 | ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
16 | WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | ||
17 | ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | ||
18 | OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | ||
19 | 19 | ||
20 | You should have received a copy of the GNU General Public License | 20 | Please send error reports and suggestions for improvements to Robert |
21 | along with this program. If not, see | 21 | Alessi <alessi@robertalessi.net> |
22 | <http://www.gnu.org/licenses/>. | ||
23 | --]] | 22 | --]] |
24 | 23 | ||
25 | tanwinnv = { | 24 | tanwinnv = { |
@@ -36,9 +35,9 @@ tanwinnv = { | |||
36 | -- {a="(O[%S]-)(%-?aN)(Y)(O)([rlmnwy])", b="%5%5"}, | 35 | -- {a="(O[%S]-)(%-?aN)(Y)(O)([rlmnwy])", b="%5%5"}, |
37 | -- {a="%-?(aN)(_A)(%s)([rlmnwy])", b="ى%3%4%4"}, | 36 | -- {a="%-?(aN)(_A)(%s)([rlmnwy])", b="ى%3%4%4"}, |
38 | -- {a="%-?(aN)(Y)(%s)([rlmnwy])", b="ى%3%4%4"}, | 37 | -- {a="%-?(aN)(Y)(%s)([rlmnwy])", b="ى%3%4%4"}, |
39 | -- {a="(T)%-?(aN)(%s)([rlmnwy])", b="%1%3%4%4"}, | 38 | -- {a="([TH])%-?(aN)(%s)([rlmnwy])", b="%1%3%4%4"}, |
40 | -- {a="(ء)%-?(aN)(%s)([rlmnwy])", b="%1%3%4%4"}, | 39 | -- {a="(ء)%-?(aN)(%s)([rlmnwy])", b="%1%3%4%4"}, |
41 | -- {a="([^TA])%-?(aN)(%s)([rlmnwy])", b="%1ا%3%4%4"}, | 40 | -- {a="([^TAH])%-?(aN)(%s)([rlmnwy])", b="%1ا%3%4%4"}, |
42 | -- {a="%-?(iNI?)(%s)([rlmnwy])", b="|%2%3%3"}, | 41 | -- {a="%-?(iNI?)(%s)([rlmnwy])", b="|%2%3%3"}, |
43 | -- assimilations (end) | 42 | -- assimilations (end) |
44 | -- "quoted" tanwīn (begin) | 43 | -- "quoted" tanwīn (begin) |
@@ -46,9 +45,9 @@ tanwinnv = { | |||
46 | {a="(B)%-?(\"aN)", b="%1ً"}, | 45 | {a="(B)%-?(\"aN)", b="%1ً"}, |
47 | {a="%-?(\"aN)(_A)", b="ًى"}, | 46 | {a="%-?(\"aN)(_A)", b="ًى"}, |
48 | {a="%-?(\"aN)(Y)", b="ًى"}, | 47 | {a="%-?(\"aN)(Y)", b="ًى"}, |
49 | {a="(T)%-?(\"aN)", b="%1ً"}, | 48 | {a="([TH])%-?(\"aN)", b="%1ً"}, |
50 | {a="([اآ])(ء)%-?(\"aN)", b="%1%2ً"}, --new | 49 | {a="([اآ])(ء)%-?(\"aN)", b="%1%2ً"}, --new |
51 | {a="([^TA])%-?(\"aN)", b="%1ًا"}, | 50 | {a="([^TAH])%-?(\"aN)", b="%1ًا"}, |
52 | {a="%-?(\"iNI?)", b="ٍ"}, | 51 | {a="%-?(\"iNI?)", b="ٍ"}, |
53 | -- "quoted" tanwīn (end) | 52 | -- "quoted" tanwīn (end) |
54 | {a="%-?(uN)", b=""}, | 53 | {a="%-?(uN)", b=""}, |
@@ -56,15 +55,15 @@ tanwinnv = { | |||
56 | -- needed by \arbcolor: | 55 | -- needed by \arbcolor: |
57 | {a="%-?(aN)(O[%S]-%_AO)", b=""}, | 56 | {a="%-?(aN)(O[%S]-%_AO)", b=""}, |
58 | {a="%-?(aN)(O[%S]-YO)", b=""}, | 57 | {a="%-?(aN)(O[%S]-YO)", b=""}, |
59 | {a="(O[%S]-TO)%-?(aN)", b=""}, | 58 | {a="(O[%S]-[TH]O)%-?(aN)", b=""}, |
60 | {a="(O[%S]-)([اآ])(ء)(O)%-?(aN)", b=""}, --new | 59 | {a="(O[%S]-)([اآ])(ء)(O)%-?(aN)", b=""}, --new |
61 | {a="(O[%S]-[^TA]O)%-?(aN)", b=""}, | 60 | {a="(O[%S]-[^TAH]O)%-?(aN)", b=""}, |
62 | -- | 61 | -- |
63 | {a="%-?(aN)(_A)", b="ى"}, | 62 | {a="%-?(aN)(_A)", b="ى"}, |
64 | {a="%-?(aN)(Y)", b="ى"}, | 63 | {a="%-?(aN)(Y)", b="ى"}, |
65 | {a="(T)%-?(aN)", b="%1"}, | 64 | {a="([TH])%-?(aN)", b="%1"}, |
66 | {a="([اآ])(ء)%-?(aN)", b="%1%2"}, --new | 65 | {a="([اآ])(ء)%-?(aN)", b="%1%2"}, --new |
67 | {a="([^TA])%-?(aN)", b="%1ا"}, | 66 | {a="([^TAH])%-?(aN)", b="%1ا"}, |
68 | {a="%-?(iNI?)", b=""}, | 67 | {a="%-?(iNI?)", b=""}, |
69 | -- ʾalif al-waṣl: put it back on with \arbnull | 68 | -- ʾalif al-waṣl: put it back on with \arbnull |
70 | {a="(O[%S]-)([%'a]l%-)(O)(\"?[uai])", b="%4"}, | 69 | {a="(O[%S]-)([%'a]l%-)(O)(\"?[uai])", b="%4"}, |