From fd5cb3ef247d97c4aac93eab2ced35daf3f1ab0f Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Wed, 15 Jan 2014 00:32:20 +0000 Subject: luatexja (14jan14) git-svn-id: svn://tug.org/texlive/trunk@32678 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/luatex/luatexja/ltj-charrange.lua | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'Master/texmf-dist/tex/luatex/luatexja/ltj-charrange.lua') diff --git a/Master/texmf-dist/tex/luatex/luatexja/ltj-charrange.lua b/Master/texmf-dist/tex/luatex/luatexja/ltj-charrange.lua index f15a15b18f5..e3478ab8180 100644 --- a/Master/texmf-dist/tex/luatex/luatexja/ltj-charrange.lua +++ b/Master/texmf-dist/tex/luatex/luatexja/ltj-charrange.lua @@ -28,7 +28,8 @@ pow_table[31*ATTR_RANGE] = pow(2, 31) -- external 1 2 216, (out of range): 'other' -- initialize -local jcr_table_main = {} +jcr_table_main = {} +local jcr_table_main = jcr_table_main local jcr_cjk = 0; local jcr_noncjk = 1; local ucs_out = 0x110000 for i=0x80 ,0xFF do jcr_table_main[i]=1 end @@ -36,11 +37,11 @@ for i=0x100,ucs_out-1 do jcr_table_main[i]=0 end -- EXT: add characters to a range function add_char_range(b,e,ind) -- ind: external range number - if not ind or ind<0 or ind>=7*ATTR_RANGE then -- 0 は error にしない(隠し) + if not ind or ind<0 or ind>=31*ATTR_RANGE then -- 0 は error にしない(隠し) ltjb.package_error('luatexja', "invalid character range number (" .. ind .. ")", "A character range number should be in the range 1.." - .. 7+ATTR_RANGE-1 .. ",\n" .. + .. 31*ATTR_RANGE-1 .. ",\n" .. "ignored.") return elseif b<0x80 or e>=ucs_out then -- cgit v1.2.3