diff options
author | Akira Kakuto <kakuto@fuk.kindai.ac.jp> | 2015-08-26 22:46:29 +0000 |
---|---|---|
committer | Akira Kakuto <kakuto@fuk.kindai.ac.jp> | 2015-08-26 22:46:29 +0000 |
commit | 1f69e204c31f8c498a4575d6a0cd85c31ae9318a (patch) | |
tree | ac59534c241279d3ada6c1ead7c8263049450b2d /Build | |
parent | 4f16ac0c16b928eb304c0f0ad3ff60708f0eaccc (diff) |
web2c/luatexdir/tex/mlist.w: sync with the trunk. See http://tug.org/pipermail/luatex/2015-August/005319.html
git-svn-id: svn://tug.org/texlive/trunk@38212 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rw-r--r-- | Build/source/texk/web2c/luatexdir/ChangeLog | 5 | ||||
-rw-r--r-- | Build/source/texk/web2c/luatexdir/tex/mlist.w | 64 |
2 files changed, 37 insertions, 32 deletions
diff --git a/Build/source/texk/web2c/luatexdir/ChangeLog b/Build/source/texk/web2c/luatexdir/ChangeLog index 35de913dc2a..a872d51dfbf 100644 --- a/Build/source/texk/web2c/luatexdir/ChangeLog +++ b/Build/source/texk/web2c/luatexdir/ChangeLog @@ -1,3 +1,8 @@ +2015-08-27 Akira Kakuto <kakuto@fuk.kindai.ac.jp> + + * tex/mlist.w: Sync with the trunk. + See http://tug.org/pipermail/luatex/2015-August/005319.html + 2015-07-10 Peter Breitenlohner <peb@mppmu.mpg.de> * am/luatex.am: Dependencies for 'make check'. diff --git a/Build/source/texk/web2c/luatexdir/tex/mlist.w b/Build/source/texk/web2c/luatexdir/tex/mlist.w index 5de4dbec1b9..9ae2607265c 100644 --- a/Build/source/texk/web2c/luatexdir/tex/mlist.w +++ b/Build/source/texk/web2c/luatexdir/tex/mlist.w @@ -2752,38 +2752,38 @@ kerns assuming that is italic correction. The heuristics are unreliable for the new fonts so eventualy there will be an option to ignore such corrections. @ @c -#define analyze_script(init,su_n,su_f,su_c) do { \ - su_n = init; \ - if (su_n != null) { \ - if (type(su_n) == sub_mlist_node) { \ - su_n = math_list(su_n); \ - if (su_n != null) { \ - while (su_n) { \ - if ((type(su_n) == kern_node) || (type(su_n) == glue_node)) {\ - su_n = vlink(su_n); \ - } else if (type(su_n) == simple_noad) { \ - su_n = nucleus(su_n); \ - if (type(su_n) != math_char_node) { \ - su_n = null; \ - } \ - break; \ - } else { \ - su_n = null; \ - break; \ - } \ - } \ - } \ - } \ - if (su_n != null) { \ - fetch(su_n); \ - if (char_exists(cur_f, cur_c)) { \ - su_f = cur_f; \ - su_c = cur_c; \ - } else { \ - su_n = null; \ - } \ - } \ - } \ +#define analyze_script(init,su_n,su_f,su_c) do { \ + su_n = init; \ + if (su_n != null) { \ + if (type(su_n) == sub_mlist_node && math_list(su_n)) { \ + su_n = math_list(su_n); \ + if (su_n != null) { \ + while (su_n) { \ + if ((type(su_n) == kern_node) || (type(su_n) == glue_node)) {\ + su_n = vlink(su_n); \ + } else if (type(su_n) == simple_noad) { \ + su_n = nucleus(su_n); \ + if (type(su_n) != math_char_node) { \ + su_n = null; \ + } \ + break; \ + } else { \ + su_n = null; \ + break; \ + } \ + } \ + } \ + } \ + if ((su_n != null) && (type(su_n) == math_char_node)) { \ + fetch(su_n); \ + if (char_exists(cur_f, cur_c)) { \ + su_f = cur_f; \ + su_c = cur_c; \ + } else { \ + su_n = null; \ + } \ + } \ + } \ } while (0) |