diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-27 03:00:59 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-27 03:00:59 +0000 |
commit | 5827a950592f8a91468bcd0b5963d1df8d3518d8 (patch) | |
tree | cc7de4d173aa3c2c42e0099e0d6ce358ad969ff3 /macros/luatex/generic/luatexja/src/ltj-compat.lua | |
parent | 55b9d356c616c30b8a2892babf47015ca39fb549 (diff) |
CTAN sync 201909270300
Diffstat (limited to 'macros/luatex/generic/luatexja/src/ltj-compat.lua')
-rw-r--r-- | macros/luatex/generic/luatexja/src/ltj-compat.lua | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/macros/luatex/generic/luatexja/src/ltj-compat.lua b/macros/luatex/generic/luatexja/src/ltj-compat.lua index bd798545f3..c8e046c63d 100644 --- a/macros/luatex/generic/luatexja/src/ltj-compat.lua +++ b/macros/luatex/generic/luatexja/src/ltj-compat.lua @@ -1,5 +1,5 @@ -- --- luatexja/ltj-compat.lua +-- ltj-compat.lua -- luatexja.load_module('base'); local ltjb = luatexja.base @@ -7,7 +7,7 @@ luatexja.load_module('stack'); local ltjs = luatexja.stack local stack_table_index = luatexja.stack_table_index -- load jisx0208 table -local cache_ver = 2 +local cache_ver = 3 local cache_outdate_fn = function (t) return t.version~=cache_ver end local jisx0208 = ltjb.load_cache('ltj-jisx0208',cache_outdate_fn) @@ -53,7 +53,11 @@ local function from_kuten(i) "I'm going to use 0 instead of that illegal character code.") i=0 end - tex.write(tostring(jisx0208.table_jisx0208_uptex[i] or 0)) + if (i%256==0)or(i%256>94) then + tex.write('0') + else + tex.write(tostring(jisx0208.table_jisx0208_uptex[math.floor(i/256)*94+(i%256)-94] or 0)) + end end -- \euc: EUC-JP による符号位置 => Unicode 符号位置 |