• R/O
  • HTTP
  • SSH
  • HTTPS

luatexja: コミット

ソースコードの管理場所


コミットメタ情報

リビジョン7876940dc1281e7f3d7cff8c4be150e5881cc9bb (tree)
日時2019-07-25 17:43:05
作者Hironori Kitagawa <h_kitagawa2001@yaho...>
コミッターHironori Kitagawa

ログメッセージ

support \ltjjachar<c> where <c> <= 255

変更サマリ

差分

--- a/src/luatexja-core.sty
+++ b/src/luatexja-core.sty
@@ -477,14 +477,20 @@
477477
478478 %%%%%%%% \ltjalchar<number>, \ltjjachar<number>
479479 \let\ltj@@origchar=\char
480-\protected\def\ltj@alljachar{\relax
481- \csname ltj@kcat0\endcsname\z@
482- \csname ltj@kcat1\endcsname\z@
483- \csname ltj@kcat2\endcsname\z@
484- \csname ltj@kcat3\endcsname\z@
485- \csname ltj@kcat4\endcsname\z@
486- \csname ltj@kcat5\endcsname\z@
487- \csname ltj@kcat6\endcsname\z@}
480+\newluafunction\ltj@alljachar@inner
481+\directlua{
482+ local t, set_attr = lua.get_functions_table(), tex.setattribute
483+ local get_attr, floor = tex.getattribute, math.floor
484+ local attr_curjfnt = luatexbase.attributes['ltj@curjfnt']
485+ local lang_ja = luatexja.lang_ja
486+ t[\the\ltj@alljachar@inner] = function()
487+ font.current(get_attr(attr_curjfnt)); tex.language=lang_ja;
488+ for i=0,6 do
489+ set_attr(luatexbase.attributes['ltj@kcat' .. floor(i)],0)
490+ end
491+ end
492+}
493+\protected\def\ltj@alljachar{\luafunction\ltj@alljachar@inner}
488494 \protected\def\ltj@allalchar{\relax
489495 \csname ltj@kcat0\endcsname="7FFFFFFF %"
490496 \csname ltj@kcat1\endcsname="7FFFFFFF %"
旧リポジトリブラウザで表示