diff options
author | Karl Berry <karl@freefriends.org> | 2015-09-06 23:21:08 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2015-09-06 23:21:08 +0000 |
commit | 63418fbbd680a1772e0c63b5043ae52de45e6e47 (patch) | |
tree | ed8310b4c6c06617ff889f6d1ca6312e4c967337 /Master/texmf-dist/tex/luatex/luatexja/ltj-stack.lua | |
parent | 1d472d214213c24b5cd6fc136a8834c121ebf922 (diff) |
luatexja (6sep15)
git-svn-id: svn://tug.org/texlive/trunk@38309 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/luatex/luatexja/ltj-stack.lua')
-rw-r--r-- | Master/texmf-dist/tex/luatex/luatexja/ltj-stack.lua | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/Master/texmf-dist/tex/luatex/luatexja/ltj-stack.lua b/Master/texmf-dist/tex/luatex/luatexja/ltj-stack.lua index ef7a36926ee..72e8b8222f5 100644 --- a/Master/texmf-dist/tex/luatex/luatexja/ltj-stack.lua +++ b/Master/texmf-dist/tex/luatex/luatexja/ltj-stack.lua @@ -20,6 +20,7 @@ local sid_user = node.subtype('user_defined') local STCK = luatexja.userid_table.STCK local fastcopy = table.fastcopy local setcount = tex.setcount +local scan_int, scan_keyword = luatexja.token.scan_int, luatexja.token.scan_keyword hmode = 0 -- dummy charprop_stack_table={}; @@ -62,8 +63,11 @@ end local set_stack_table = set_stack_table -- EXT -function set_stack_perchar(m,c,p,lb,ub) - if type(p)~='number' or p<lb or p>ub then +function set_stack_perchar(m,lb,ub, getter) + local c = scan_int() + scan_keyword(',') + local p = tonumber((getter or scan_int)()) + if p<lb or p>ub then ltjb.package_error('luatexja', "invalid code (".. tostring(p) .. ")", "The code should in the range "..tostring(lb) .. '..' .. |