From 3b64a5f55fe9d0bfab8d85b52ceb282204cb7c06 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sun, 8 Jan 2017 22:22:03 +0000 Subject: arabluatex (8jan17) git-svn-id: svn://tug.org/texlive/trunk@42904 c570f23f-e606-0410-a88d-b1316a301751 --- .../tex/lualatex/arabluatex/arabluatex-patch.sty | 2 +- .../tex/lualatex/arabluatex/arabluatex.lua | 2 +- .../tex/lualatex/arabluatex/arabluatex.sty | 4 +- .../tex/lualatex/arabluatex/arabluatex_fullvoc.lua | 172 +++++++++++---------- .../tex/lualatex/arabluatex/arabluatex_novoc.lua | 14 +- .../tex/lualatex/arabluatex/arabluatex_trans.lua | 34 ++-- .../tex/lualatex/arabluatex/arabluatex_voc.lua | 134 ++++++++-------- 7 files changed, 185 insertions(+), 177 deletions(-) (limited to 'Master/texmf-dist/tex') diff --git a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex-patch.sty b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex-patch.sty index 68f05a3b05a..410924e409c 100644 --- a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex-patch.sty +++ b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex-patch.sty @@ -11,7 +11,7 @@ %% This file is part of the `arabluatex' package %% %% ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX -%% Copyright (C) 2016 Robert Alessi +%% Copyright (C) 2016--2017 Robert Alessi %% %% Please send error reports and suggestions for improvements to Robert %% Alessi diff --git a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua index 3b552b6749e..91932b78213 100644 --- a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua +++ b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.lua @@ -2,7 +2,7 @@ This file is part of the `arabluatex' package ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX -Copyright (C) 2016 Robert Alessi +Copyright (C) 2016--2017 Robert Alessi Please send error reports and suggestions for improvements to Robert Alessi diff --git a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.sty b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.sty index cc194e834cf..1a8666ba9cf 100644 --- a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.sty +++ b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex.sty @@ -11,7 +11,7 @@ %% This file is part of the `arabluatex' package %% %% ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX -%% Copyright (C) 2016 Robert Alessi +%% Copyright (C) 2016--2017 Robert Alessi %% %% Please send error reports and suggestions for improvements to Robert %% Alessi @@ -41,7 +41,7 @@ %% \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{arabluatex}% -[2016/12/24 v1.7 An ArabTeX-like interface for LuaLaTeX] +[2017/01/08 v1.7.1 An ArabTeX-like interface for LuaLaTeX] \RequirePackage{ifluatex} \ifluatex\else \PackageError{arabluatex}{lualatex needed}{% diff --git a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_fullvoc.lua b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_fullvoc.lua index 31956a65db5..097aa5deb31 100644 --- a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_fullvoc.lua +++ b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_fullvoc.lua @@ -2,7 +2,7 @@ This file is part of the `arabluatex' package ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX -Copyright (C) 2016 Robert Alessi +Copyright (C) 2016--2017 Robert Alessi Please send error reports and suggestions for improvements to Robert Alessi @@ -33,14 +33,14 @@ hamzafv = { {a="i\"'", b="إ"}, {a="y\"'", b="ئ"}, {a="ؤ([^uaiUAI])", b="ؤْ%1"}, - {a="ؤ$", b="ؤْ"}, - {a="ؤ(%s)", b="ؤْ%1"}, + {a="ؤ(%p?)$", b="ؤْ%1"}, + {a="ؤ(%p?%s)", b="ؤْ%1"}, {a="أ([^uaiUAI])", b="أْ%1"}, - {a="أ$", b="أْ"}, - {a="أ(%s)", b="أْ%1"}, + {a="أ(%p?)$", b="أْ%1"}, + {a="أ(%p?%s)", b="أْ%1"}, {a="ئ([^uaiUAI])", b="ئْ%1"}, - {a="ئ$", b="ئْ"}, - {a="ئ(%s)", b="ئْ%1"}, + {a="ئ(%p?)$", b="ئْ%1"}, + {a="ئ(%p?%s)", b="ئْ%1"}, -- hamza takes tašdīd too {a="''([Uu])", b="ؤؤ%1"}, {a="''([Aa])", b="أأ%1"}, @@ -58,10 +58,10 @@ hamzafv = { {a="([^uiUI])\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="%1آ%2"}, {a="^\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="آ%1"}, {a="(%W)\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="%1آ%2"}, - {a="(A)(')(uN?)$", b="aآء%3"}, - {a="(A)(')(uN?)(%W)", b="aآء%3%4"}, - {a="(A)(')(iN?)$", b="aآء%3"}, - {a="(A)(')(iN?)(%W)", b="aآء%3%4"}, + {a="(A)(')(uN?%p?)$", b="aآء%3"}, + {a="(A)(')(uN?)(%p?%s)", b="aآء%3%4"}, + {a="(A)(')(iN?%p?)$", b="aآء%3"}, + {a="(A)(')(iN?)(%p?%s)", b="aآء%3%4"}, {a="(A)(')([iI])", b="aآئ%3"}, -- historic madda {a="(A)(')(u)", b="aآؤ%3"}, -- historic madda {a="(A)(')", b="aآء"}, -- historic madda @@ -84,31 +84,33 @@ hamzafv = { -- ^say'aN and .zim'aN are special orthographies {a="(%^say)(%')(aN)", b="%1ئ%3"}, {a="(.zi?m)(%')(aN)", b="%1ئ%3"}, - {a="([^uai])(')([uai][^%.%^%_]N?)$", b="%1ء%3"}, - {a="([^uai])(')([uai][^%.%^%_]N?)(%W)", b="%1ء%3%4"}, + {a="(')(I%p?)$", b="إ%2"}, -- affix pr. 1st person sg. + {a="(')(I)(%p?%s)", b="إ%2%3"}, -- affix pr. 1st person sg. + {a="([^uai])(')([uai]N?%p?)$", b="%1ء%3"}, + {a="([^uai])(')([uai]N?)(%p?%s)", b="%1ء%3%4"}, -- u - {a="(u)(')([uai][^%.%^%_]N?)$", b="%1ؤ%3"}, - {a="(u)(')([uai][^%.%^%_]N?)(%W)", b="%1ؤ%3%4"}, - {a="(u)(')$", b="%1ؤْ"}, - {a="(u)(')(%W)", b="%1ؤْ%3"}, + {a="(u)(')([uai]N?%p?)$", b="%1ؤ%3"}, + {a="(u)(')([uai]N?)(%p?%s)", b="%1ؤ%3%4"}, + {a="(u)('%p?)$", b="%1ؤْ"}, + {a="(u)(')(%p?%s)", b="%1ؤْ%3"}, -- a - {a="(a)(')(A)$", b="%1آ"}, - {a="(a)(')(A)(%W)", b="%1آ%4"}, - {a="(a)(')([u][^%.%^%_]N?)$", b="%1أ%3"}, - {a="(a)(')([u][^%.%^%_]N?)(%W)", b="%1أ%3%4"}, - {a="(a)(')(a)$", b="%1أ%3"}, - {a="(a)(')(a)(%W)", b="%1أ%3%4"}, - {a="(a)(')(aN)$", b="%1أً"}, - {a="(a)(')(aN)(%W)", b="%1أً%4"}, - {a="(a)(')([i][^%.%^%_]N?)$", b="%1إ%3"}, - {a="(a)(')([i][^%.%^%_]N?)(%W)", b="%1إ%3%4"}, - {a="(a)(')$", b="%1أْ"}, - {a="(a)(')(%W)", b="%1أْ%3"}, + {a="(a)(')(A%p?)$", b="%1آ"}, + {a="(a)(')(A)(%p?%s)", b="%1آ%4"}, + {a="(a)(')([u]N?%p?)$", b="%1أ%3"}, + {a="(a)(')([u]N?)(%p?%s)", b="%1أ%3%4"}, + {a="(a)(')(a%p?)$", b="%1أ%3"}, + {a="(a)(')(a)(%p?%s)", b="%1أ%3%4"}, + {a="(a)(')(aN%p?)$", b="%1أً"}, + {a="(a)(')(aN)(%p?%s)", b="%1أً%4"}, + {a="(a)(')([i]N?%p?)$", b="%1إ%3"}, + {a="(a)(')([i]N?)(%p?%s)", b="%1إ%3%4"}, + {a="(a)('%p?)$", b="%1أْ"}, + {a="(a)(')(%p?%s)", b="%1أْ%3"}, -- i - {a="(i)(')([uai][^%.%^%_]N?)$", b="%1ئ%3"}, - {a="(i)(')([uai][^%.%^%_]N?)(%W)", b="%1ئ%3%4"}, - {a="(i)(')$", b="%1ئْ"}, - {a="(i)(')(%W)", b="%1ئْ%3"}, + {a="(i)(')([uai]N?%p?)$", b="%1ئ%3"}, + {a="(i)(')([uai]N?)(%p?%s)", b="%1ئ%3%4"}, + {a="(i)('%p?)$", b="%1ئْ"}, + {a="(i)(')(%p?%s)", b="%1ئْ%3"}, -- -- middle {a="(U)(')", b="%1ء"}, @@ -141,14 +143,14 @@ hamzafveasy = { -- differences marked below with 'easy' {a="i\"'", b="إ"}, {a="y\"'", b="ئ"}, {a="ؤ([^uaiUAI])", b="ؤْ%1"}, - {a="ؤ$", b="ؤْ"}, - {a="ؤ(%s)", b="ؤْ%1"}, + {a="ؤ(%p?)$", b="ؤْ%1"}, + {a="ؤ(%p?%s)", b="ؤْ%1"}, {a="أ([^uaiUAI])", b="أْ%1"}, - {a="أ$", b="أْ"}, - {a="أ(%s)", b="أْ%1"}, + {a="أ(%p?)$", b="أْ%1"}, + {a="أ(%p?%s)", b="أْ%1"}, {a="ئ([^uaiUAI])", b="ئْ%1"}, - {a="ئ$", b="ئْ"}, - {a="ئ(%s)", b="ئْ%1"}, + {a="ئ(%p?)$", b="ئْ%1"}, + {a="ئ(%p?%s)", b="ئْ%1"}, -- hamza takes tašdīd too {a="''([Uu])", b="ؤؤ%1"}, {a="''([Aa])", b="أأ%1"}, @@ -167,10 +169,10 @@ hamzafveasy = { -- differences marked below with 'easy' {a="^\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="آ%1"}, {a="(%W)\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="%1آ%2"}, --easy (begin) - {a="(A)(')(uN?)$", b="aاء%3"}, - {a="(A)(')(uN?)(%W)", b="aاء%3%4"}, - {a="(A)(')(iN?)$", b="aاء%3"}, - {a="(A)(')(iN?)(%W)", b="aاء%3%4"}, + {a="(A)(')(uN?%p?)$", b="aاء%3"}, + {a="(A)(')(uN?)(%p?%s)", b="aاء%3%4"}, + {a="(A)(')(iN?%p?)$", b="aاء%3"}, + {a="(A)(')(iN?)(%p?%s)", b="aاء%3%4"}, {a="(A)(')([iI])", b="aائ%3"}, -- historic madda {a="(A)(')(u)", b="aاؤ%3"}, -- historic madda {a="(A)(')", b="aاء"}, -- historic madda @@ -194,31 +196,33 @@ hamzafveasy = { -- differences marked below with 'easy' -- ^say'aN and .zim'aN are special orthographies {a="(%^say)(%')(aN)", b="%1ئ%3"}, {a="(.zi?m)(%')(aN)", b="%1ئ%3"}, - {a="([^uai])(')([uai][^%.%^%_]N?)$", b="%1ء%3"}, - {a="([^uai])(')([uai][^%.%^%_]N?)(%W)", b="%1ء%3%4"}, + {a="(')(I%p?)$", b="إ%2"}, -- affix pr. 1st person sg. + {a="(')(I)(%p?%s)", b="إ%2%3"}, -- affix pr. 1st person sg. + {a="([^uai])(')([uai]N?%p?)$", b="%1ء%3"}, + {a="([^uai])(')([uai]N?)(%p?%s)", b="%1ء%3%4"}, -- u - {a="(u)(')([uai][^%.%^%_]N?)$", b="%1ؤ%3"}, - {a="(u)(')([uai][^%.%^%_]N?)(%W)", b="%1ؤ%3%4"}, - {a="(u)(')$", b="%1ؤْ"}, - {a="(u)(')(%W)", b="%1ؤْ%3"}, + {a="(u)(')([uai]N?%p?)$", b="%1ؤ%3"}, + {a="(u)(')([uai]N?)(%p?%s)", b="%1ؤ%3%4"}, + {a="(u)('%p?)$", b="%1ؤْ"}, + {a="(u)(')(%p?%s)", b="%1ؤْ%3"}, -- a - {a="(a)(')(A)$", b="%1آ"}, - {a="(a)(')(A)(%W)", b="%1آ%4"}, - {a="(a)(')([u][^%.%^%_]N?)$", b="%1أ%3"}, - {a="(a)(')([u][^%.%^%_]N?)(%W)", b="%1أ%3%4"}, - {a="(a)(')(a)$", b="%1أ%3"}, - {a="(a)(')(a)(%W)", b="%1أ%3%4"}, - {a="(a)(')(aN)$", b="%1أً"}, - {a="(a)(')(aN)(%W)", b="%1أً%4"}, - {a="(a)(')([i][^%.%^%_]N?)$", b="%1إ%3"}, - {a="(a)(')([i][^%.%^%_]N?)(%W)", b="%1إ%3%4"}, - {a="(a)(')$", b="%1أْ"}, - {a="(a)(')(%W)", b="%1أْ%3"}, + {a="(a)(')(A%p?)$", b="%1آ"}, + {a="(a)(')(A)(%p?%s)", b="%1آ%4"}, + {a="(a)(')([u]N?%p?)$", b="%1أ%3"}, + {a="(a)(')([u]N?)(%p?%s)", b="%1أ%3%4"}, + {a="(a)(')(a%p?)$", b="%1أ%3"}, + {a="(a)(')(a)(%p?%s)", b="%1أ%3%4"}, + {a="(a)(')(aN%p?)$", b="%1أً"}, + {a="(a)(')(aN)(%p?%s)", b="%1أً%4"}, + {a="(a)(')([i]N?%p?)$", b="%1إ%3"}, + {a="(a)(')([i]N?)(%p?%s)", b="%1إ%3%4"}, + {a="(a)('%p?)$", b="%1أْ"}, + {a="(a)(')(%p?%s)", b="%1أْ%3"}, -- i - {a="(i)(')([uai][^%.%^%_]N?)$", b="%1ئ%3"}, - {a="(i)(')([uai][^%.%^%_]N?)(%W)", b="%1ئ%3%4"}, - {a="(i)(')$", b="%1ئْ"}, - {a="(i)(')(%W)", b="%1ئْ%3"}, + {a="(i)(')([uai]N?%p?)$", b="%1ئ%3"}, + {a="(i)(')([uai]N?)(%p?%s)", b="%1ئ%3%4"}, + {a="(i)('%p?)$", b="%1ئْ"}, + {a="(i)(')(%p?%s)", b="%1ئْ%3"}, -- -- middle {a="(U)(')", b="%1ء"}, @@ -388,12 +392,12 @@ trigraphsfv = { -- trigraphs or more -- art. with waṣla + lunar consonant (i.e. what remains) {a="'l%-", b="ٱلْ"}, -- the silent wāw - {a="uU$", b="uو"}, - {a="uU(%W)", b="uو%1"}, - {a="aU$", b="aو"}, - {a="aU(%W)", b="aو%1"}, - {a="iU$", b="iو"}, - {a="iU(%W)", b="iو%1"}, + {a="uU(%p?)$", b="uو%1"}, + {a="uU(%p?%s)", b="uو%1"}, + {a="aU(%p?)$", b="aو%1"}, + {a="aU(%p?%s)", b="aو%1"}, + {a="iU(%p?)$", b="iو%1"}, + {a="iU(%p?%s)", b="iو%1"}, -- words ending in -āT with silent wāw/yāʾ {a="(_a)UA", b="%1وا"}, {a="(_a)U", b="%1و"}, @@ -457,12 +461,12 @@ trigraphsfveasy = { -- trigraphs or more (see 'easy' tag below for the diffs) -- art. with waṣla + lunar consonant (i.e. what remains) {a="'l%-", b="ٱلْ"}, -- the silent wāw - {a="uU$", b="uو"}, - {a="uU(%W)", b="uو%1"}, - {a="aU$", b="aو"}, - {a="aU(%W)", b="aو%1"}, - {a="iU$", b="iو"}, - {a="iU(%W)", b="iو%1"}, + {a="uU(%p?)$", b="uو%1"}, + {a="uU(%p?%s)", b="uو%1"}, + {a="aU(%p?)$", b="aو%1"}, + {a="aU(%p?%s)", b="aو%1"}, + {a="iU(%p?)$", b="iو%1"}, + {a="iU(%p?%s)", b="iو%1"}, -- words ending in -āT with silent wāw/yāʾ {a="(_a)UA", b="%1وا"}, {a="(_a)U", b="%1و"}, @@ -538,8 +542,8 @@ digraphsfvidgham = { -- sukūn begin -- first, take out hyphen if any: {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])%-([uaiUAI])", b="%1%2"}, - {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])$", b="%1ْ"}, - {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])([%s])", b="%1ْ%2"}, + {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy]%p?)$", b="%1ْ"}, + {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])(%p?%s)", b="%1ْ%2"}, {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])([%_]?[^%_uaiUAIYًٌٍ])", b="%1ْ%2"}, -- take out sukūn in cases of assimilation {a="(n)(ْ)(%s)(ر)", b="%1%3%4"}, @@ -646,8 +650,8 @@ digraphsfv = { -- sukūn begin -- first, take out hyphen if any: {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])%-([uaiUAI])", b="%1%2"}, - {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])$", b="%1ْ"}, - {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])([%s])", b="%1ْ%2"}, + {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy]%p?)$", b="%1ْ"}, + {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])(%p?%s)", b="%1ْ%2"}, {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])([%_]?[^%_uaiUAIYًٌٍ])", b="%1ْ%2"}, -- take out sukūn in cases of assimilation -- {a="(n)(ْ)(%s)(ر)", b="%1%3%4"}, @@ -656,7 +660,7 @@ digraphsfv = { -- {a="(n)(ْ)(%s)(ل)", b="%1%3%4"}, -- {a="(n)(ْ)(%s)(م)", b="%1%3%4"}, -- {a="(n)(ْ)(%s)(ن)", b="%1%3%4"}, --- {a="ْ\"", b="\""}, + {a="ْ\"", b="\""}, -- sukūn end {a="_t", b="ث"}, {a="%^g", b="ج"}, @@ -757,8 +761,8 @@ digraphsfveasy = { -- see the differences under 'easy' marker below {a="ْ", b=""}, -- first, take out hyphen if any: -- {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])%-([uaiUAI])", b="%1%2"}, --- {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])$", b="%1ْ"}, --- {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])([%s])", b="%1ْ%2"}, +-- {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy]%p?)$", b="%1ْ"}, +-- {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])(%p?%s)", b="%1ْ%2"}, -- {a="([%_%^%.]?[Bbtjghxdrzs%`fqklmnwy])([%_]?[^%_uaiUAIًٌٍ])", b="%1ْ%2"}, -- take out sukūn in cases of assimilation -- {a="(n)(ْ)(%s)(ر)", b="%1%3%4"}, diff --git a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_novoc.lua b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_novoc.lua index a79be821028..55eccdc4b88 100644 --- a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_novoc.lua +++ b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_novoc.lua @@ -2,7 +2,7 @@ This file is part of the `arabluatex' package ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX -Copyright (C) 2016 Robert Alessi +Copyright (C) 2016--2017 Robert Alessi Please send error reports and suggestions for improvements to Robert Alessi @@ -109,12 +109,12 @@ trigraphsnv = { -- trigraphs or more -- art. with waṣla + lunar consonant (i.e. what remains) {a="'l%-", b="ال"}, -- the silent wāw - {a="uU$", b="uو"}, - {a="uU(%W)", b="uو%1"}, - {a="aU$", b="aو"}, - {a="aU(%W)", b="aو%1"}, - {a="iU$", b="iو"}, - {a="iU(%W)", b="iو%1"}, + {a="uU(%p?)$", b="uو%1"}, + {a="uU(%p?%s)", b="uو%1"}, + {a="aU(%p?)$", b="aو%1"}, + {a="aU(%p?%s)", b="aو%1"}, + {a="iU(%p?)$", b="iو%1"}, + {a="iU(%p?%s)", b="iو%1"}, -- words ending in -āT with silent wāw/yāʾ {a="(_a)UA", b="%1وا"}, {a="(_a)U", b="%1و"}, diff --git a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_trans.lua b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_trans.lua index c420f6f62ee..5e7dbe5dda6 100644 --- a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_trans.lua +++ b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_trans.lua @@ -2,7 +2,7 @@ This file is part of the `arabluatex' package ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX -Copyright (C) 2016 Robert Alessi +Copyright (C) 2016--2017 Robert Alessi Please send error reports and suggestions for improvements to Robert Alessi @@ -309,24 +309,24 @@ digraphstrdmg = { {a="(%-)(\"?ayni)(%p?)$", b="\\arbup{%2}%3"}, {a="(%-)(\"?[uai])(%p?%s)", b="\\arbup{%2}%3"}, {a="(%-)(\"?[uai])(%p?)$", b="\\arbup{%2}%3"}, - -- ʾiʿrāb hyphen (end) - -- shorten long vowels preceding ʾalif conjunctionis + -- ʾiʿrāb hyphen (end) shorten long vowels preceding ʾalif + -- conjunctionis—without forgetting 'lla_dI {a="(U)(A)", b="U"}, - {a="(aW)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-o)", b="awu"}, - {a="(%_a)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-o)", b="a"}, - {a="(%_A)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-o)", b="ạ"}, - {a="(A)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-o)", b="a"}, - {a="(Y)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-o)", b="ạ"}, - {a="([%_]?[Uu])(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-o)", b="u"}, - {a="([%_]?[Ii])(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)([%S]-o)", b="i"}, + {a="(aW)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])([%S]-o)", b="awu"}, + {a="(%_a)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])([%S]-o)", b="a"}, + {a="(%_A)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])([%S]-o)", b="ạ"}, + {a="(A)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])([%S]-o)", b="a"}, + {a="(Y)(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])([%S]-o)", b="ạ"}, + {a="([%_]?[Uu])(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])([%S]-o)", b="u"}, + {a="([%_]?[Ii])(o)('[%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])([%S]-o)", b="i"}, --p (next 7 lines, just after %s) - {a="(aW)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="awu%2%3"}, - {a="(%_a)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="a%2%3"}, - {a="(%_A)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ạ%2%3"}, - {a="(A)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="a%2%3"}, - {a="(Y)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="ạ%2%3"}, - {a="([%_]?[Uu])(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="u%2%3"}, - {a="([%_]?[Ii])(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy]%-)", b="i%2%3"}, + {a="(aW)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="awu%2%3"}, + {a="(%_a)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="a%2%3"}, + {a="(%_A)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="ạ%2%3"}, + {a="(A)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="a%2%3"}, + {a="(Y)(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="ạ%2%3"}, + {a="([%_]?[Uu])(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="u%2%3"}, + {a="([%_]?[Ii])(%s)([%(%[%|%<]?['][%_%^%.]?[l'btjghxdrzs`fqkmnwy][%-l])", b="i%2%3"}, {a="%-%-", b=""}, -- {a="T([^uai])", b="%1"}, {a="T(%p?%s)", b="h%1"}, diff --git a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_voc.lua b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_voc.lua index 6be30d12f99..106bf9908b0 100644 --- a/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_voc.lua +++ b/Master/texmf-dist/tex/lualatex/arabluatex/arabluatex_voc.lua @@ -2,7 +2,7 @@ This file is part of the `arabluatex' package ArabLuaTeX -- Processing ArabTeX notation under LuaLaTeX -Copyright (C) 2016 Robert Alessi +Copyright (C) 2016--2017 Robert Alessi Please send error reports and suggestions for improvements to Robert Alessi @@ -194,10 +194,10 @@ hamza = { {a="([^uiUI])\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="%1آ%2"}, {a="^\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="آ%1"}, {a="(%W)\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="%1آ%2"}, - {a="(A)(')(uN?)$", b="aآء%3"}, - {a="(A)(')(uN?)(%W)", b="aآء%3%4"}, - {a="(A)(')(iN?)$", b="aآء%3"}, - {a="(A)(')(iN?)(%W)", b="aآء%3%4"}, + {a="(A)(')(uN?%p?)$", b="aآء%3"}, + {a="(A)(')(uN?)(%p?%s)", b="aآء%3%4"}, + {a="(A)(')(iN?%p?)$", b="aآء%3"}, + {a="(A)(')(iN?)(%p?%s)", b="aآء%3%4"}, {a="(A)(')([iI])", b="aآئ%3"}, -- historic madda {a="(A)(')(u)", b="aآؤ%3"}, -- historic madda {a="(A)(')", b="aآء"}, -- historic madda @@ -220,31 +220,33 @@ hamza = { -- ^say'aN and .zim'aN are special orthographies {a="(%^say)(%')(aN)", b="%1ئ%3"}, {a="(.zi?m)(%')(aN)", b="%1ئ%3"}, - {a="([^uai])(')([uai][^%.%^%_]N?)$", b="%1ء%3"}, - {a="([^uai])(')([uai][^%.%^%_]N?)(%W)", b="%1ء%3%4"}, + {a="(')(I%p?)$", b="إ%2"}, -- affix pr. 1st person sg. + {a="(')(I)(%p?%s)", b="إ%2%3"}, -- affix pr. 1st person sg. + {a="([^uai])(')([uai]N?%p?)$", b="%1ء%3"}, + {a="([^uai])(')([uai]N?)(%p?%s)", b="%1ء%3%4"}, -- u - {a="(u)(')([uai][^%.%^%_]N?)$", b="%1ؤ%3"}, - {a="(u)(')([uai][^%.%^%_]N?)(%W)", b="%1ؤ%3%4"}, - {a="(u)(')$", b="%1ؤ"}, - {a="(u)(')(%W)", b="%1ؤ%3"}, + {a="(u)(')([uai]N?%p?)$", b="%1ؤ%3"}, + {a="(u)(')([uai]N?)(%p?%s)", b="%1ؤ%3%4"}, + {a="(u)('%p?)$", b="%1ؤ"}, + {a="(u)(')(%p?%s)", b="%1ؤ%3"}, -- a - {a="(a)(')(A)$", b="%1آ"}, - {a="(a)(')(A)(%W)", b="%1آ%4"}, - {a="(a)(')([u][^%.%^%_]N?)$", b="%1أ%3"}, - {a="(a)(')([u][^%.%^%_]N?)(%W)", b="%1أ%3%4"}, - {a="(a)(')(a)$", b="%1أ%3"}, - {a="(a)(')(a)(%W)", b="%1أ%3%4"}, - {a="(a)(')(aN)$", b="%1أً"}, - {a="(a)(')(aN)(%W)", b="%1أً%4"}, - {a="(a)(')([i][^%.%^%_]N?)$", b="%1إ%3"}, - {a="(a)(')([i][^%.%^%_]N?)(%W)", b="%1إ%3%4"}, - {a="(a)(')$", b="%1أ"}, - {a="(a)(')(%W)", b="%1أ%3"}, + {a="(a)(')(A%p?)$", b="%1آ"}, + {a="(a)(')(A)(%p?%s)", b="%1آ%4"}, + {a="(a)(')([u]N?%p?)$", b="%1أ%3"}, + {a="(a)(')([u]N?)(%p?%s)", b="%1أ%3%4"}, + {a="(a)(')(a%p?)$", b="%1أ%3"}, + {a="(a)(')(a)(%p?%s)", b="%1أ%3%4"}, + {a="(a)(')(aN%p?)$", b="%1أً"}, + {a="(a)(')(aN)(%p?%s)", b="%1أً%4"}, + {a="(a)(')([i]N?%p?)$", b="%1إ%3"}, + {a="(a)(')([i]N?)(%p?%s)", b="%1إ%3%4"}, + {a="(a)('%p?)$", b="%1أ"}, + {a="(a)(')(%p?%s)", b="%1أ%3"}, -- i - {a="(i)(')([uai][^%.%^%_]N?)$", b="%1ئ%3"}, - {a="(i)(')([uai][^%.%^%_]N?)(%W)", b="%1ئ%3%4"}, - {a="(i)(')$", b="%1ئ"}, - {a="(i)(')(%W)", b="%1ئ%3"}, + {a="(i)(')([uai]N?%p?)$", b="%1ئ%3"}, + {a="(i)(')([uai]N?)(%p?%s)", b="%1ئ%3%4"}, + {a="(i)('%p?)$", b="%1ئ"}, + {a="(i)(')(%p?%s)", b="%1ئ%3"}, -- -- middle {a="(U)(')", b="%1ء"}, @@ -294,10 +296,10 @@ hamzaeasy = { -- differences marked below with 'easy' {a="^\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="آ%1"}, {a="(%W)\'a?A([%_%^%.]?[%`%'btjghxdrzsfqklmnywAY])", b="%1آ%2"}, --easy (begin) - {a="(A)(')(uN?)$", b="aاء%3"}, - {a="(A)(')(uN?)(%W)", b="aاء%3%4"}, - {a="(A)(')(iN?)$", b="aاء%3"}, - {a="(A)(')(iN?)(%W)", b="aاء%3%4"}, + {a="(A)(')(uN?%p?)$", b="aاء%3"}, + {a="(A)(')(uN?)(%p?%s)", b="aاء%3%4"}, + {a="(A)(')(iN?%p?)$", b="aاء%3"}, + {a="(A)(')(iN?)(%p?%s)", b="aاء%3%4"}, {a="(A)(')([iI])", b="aائ%3"}, -- historic madda {a="(A)(')(u)", b="aاؤ%3"}, -- historic madda {a="(A)(')", b="aاء"}, -- historic madda @@ -321,31 +323,33 @@ hamzaeasy = { -- differences marked below with 'easy' -- ^say'aN and .zim'aN are special orthographies {a="(%^say)(%')(aN)", b="%1ئ%3"}, {a="(.zi?m)(%')(aN)", b="%1ئ%3"}, - {a="([^uai])(')([uai][^%.%^%_]N?)$", b="%1ء%3"}, - {a="([^uai])(')([uai][^%.%^%_]N?)(%W)", b="%1ء%3%4"}, + {a="(')(I%p?)$", b="إ%2"}, -- affix pr. 1st person sg. + {a="(')(I)(%p?%s)", b="إ%2%3"}, -- affix pr. 1st person sg. + {a="([^uai])(')([uai]N?%p?)$", b="%1ء%3"}, + {a="([^uai])(')([uai]N?)(%p?%s)", b="%1ء%3%4"}, -- u - {a="(u)(')([uai][^%.%^%_]N?)$", b="%1ؤ%3"}, - {a="(u)(')([uai][^%.%^%_]N?)(%W)", b="%1ؤ%3%4"}, - {a="(u)(')$", b="%1ؤ"}, - {a="(u)(')(%W)", b="%1ؤ%3"}, + {a="(u)(')([uai]N?%p?)$", b="%1ؤ%3"}, + {a="(u)(')([uai]N?)(%p?%s)", b="%1ؤ%3%4"}, + {a="(u)('%p?)$", b="%1ؤ"}, + {a="(u)(')(%p?%s)", b="%1ؤ%3"}, -- a - {a="(a)(')(A)$", b="%1آ"}, - {a="(a)(')(A)(%W)", b="%1آ%4"}, - {a="(a)(')([u][^%.%^%_]N?)$", b="%1أ%3"}, - {a="(a)(')([u][^%.%^%_]N?)(%W)", b="%1أ%3%4"}, - {a="(a)(')(a)$", b="%1أ%3"}, - {a="(a)(')(a)(%W)", b="%1أ%3%4"}, - {a="(a)(')(aN)$", b="%1أً"}, - {a="(a)(')(aN)(%W)", b="%1أً%4"}, - {a="(a)(')([i][^%.%^%_]N?)$", b="%1إ%3"}, - {a="(a)(')([i][^%.%^%_]N?)(%W)", b="%1إ%3%4"}, - {a="(a)(')$", b="%1أ"}, - {a="(a)(')(%W)", b="%1أ%3"}, + {a="(a)(')(A%p?)$", b="%1آ"}, + {a="(a)(')(A)(%p?%s)", b="%1آ%4"}, + {a="(a)(')([u]N?%p?)$", b="%1أ%3"}, + {a="(a)(')([u]N?)(%p?%s)", b="%1أ%3%4"}, + {a="(a)(')(a%p?)$", b="%1أ%3"}, + {a="(a)(')(a)(%p?%s)", b="%1أ%3%4"}, + {a="(a)(')(aN%p?)$", b="%1أً"}, + {a="(a)(')(aN)(%p?%s)", b="%1أً%4"}, + {a="(a)(')([i]N?%p?)$", b="%1إ%3"}, + {a="(a)(')([i]N?)(%p?%s)", b="%1إ%3%4"}, + {a="(a)('%p?)$", b="%1أ"}, + {a="(a)(')(%p?%s)", b="%1أ%3"}, -- i - {a="(i)(')([uai][^%.%^%_]N?)$", b="%1ئ%3"}, - {a="(i)(')([uai][^%.%^%_]N?)(%W)", b="%1ئ%3%4"}, - {a="(i)(')$", b="%1ئ"}, - {a="(i)(')(%W)", b="%1ئ%3"}, + {a="(i)(')([uai]N?%p?)$", b="%1ئ%3"}, + {a="(i)(')([uai]N?)(%p?%s)", b="%1ئ%3%4"}, + {a="(i)('%p?)$", b="%1ئ"}, + {a="(i)(')(%p?%s)", b="%1ئ%3"}, -- -- middle {a="(U)(')", b="%1ء"}, @@ -509,12 +513,12 @@ trigraphs = { -- trigraphs or more -- art. with waṣla + lunar consonant (i.e. what remains) {a="'l%-", b="ال"}, -- the silent wāw - {a="uU$", b="uو"}, - {a="uU(%W)", b="uو%1"}, - {a="aU$", b="aو"}, - {a="aU(%W)", b="aو%1"}, - {a="iU$", b="iو"}, - {a="iU(%W)", b="iو%1"}, + {a="uU(%p?)$", b="uو%1"}, + {a="uU(%p?%s)", b="uو%1"}, + {a="aU(%p?)$", b="aو%1"}, + {a="aU(%p?%s)", b="aو%1"}, + {a="iU(%p?)$", b="iو%1"}, + {a="iU(%p?%s)", b="iو%1"}, -- words ending in -āT with silent wāw/yāʾ {a="(_a)UA", b="%1وا"}, {a="(_a)U", b="%1و"}, @@ -587,12 +591,12 @@ trigraphseasy = { -- differences marked below with 'easy' -- art. with waṣla + lunar consonant (i.e. what remains) {a="'l%-", b="ال"}, -- the silent wāw - {a="uU$", b="uو"}, - {a="uU(%W)", b="uو%1"}, - {a="aU$", b="aو"}, - {a="aU(%W)", b="aو%1"}, - {a="iU$", b="iو"}, - {a="iU(%W)", b="iو%1"}, + {a="uU(%p?)$", b="uو%1"}, + {a="uU(%p?%s)", b="uو%1"}, + {a="aU(%p?)$", b="aو%1"}, + {a="aU(%p?%s)", b="aو%1"}, + {a="iU(%p?)$", b="iو%1"}, + {a="iU(%p?%s)", b="iو%1"}, -- words ending in -āT with silent wāw/yāʾ {a="(_a)UA", b="%1وا"}, {a="(_a)U", b="%1و"}, -- cgit v1.2.3