diff options
Diffstat (limited to 'Master/texmf-dist/source/luatex')
-rw-r--r-- | Master/texmf-dist/source/luatex/luatexja/tool/table_ivd_aj1.lua | 32 | ||||
-rw-r--r-- | Master/texmf-dist/source/luatex/luatexja/tool/table_jisx0208.lua (renamed from Master/texmf-dist/source/luatex/luatexja/tool/jisx0208table.tex) | 0 |
2 files changed, 32 insertions, 0 deletions
diff --git a/Master/texmf-dist/source/luatex/luatexja/tool/table_ivd_aj1.lua b/Master/texmf-dist/source/luatex/luatexja/tool/table_ivd_aj1.lua new file mode 100644 index 00000000000..cf898a47b21 --- /dev/null +++ b/Master/texmf-dist/source/luatex/luatexja/tool/table_ivd_aj1.lua @@ -0,0 +1,32 @@ +print([[ +return { +version = 2, +table_ivd_aj1 = {]]) + +local f = io.open('IVD_Sequences.txt') +local t, maxcid = {}, 0 +local s = f:read() +while s do + if s:match('#') then + print('-- ' .. s) + elseif s:match('Adobe.Japan.') then + local c1,c2,c3 = s:match('(%x+)%s+(%x+);%s+Adobe.Japan.;%s+CID%+(%d+)') + c1, c2, c3 = tonumber(c1, 16), tonumber(c2, 16), tonumber(c3) + if c2 and c2>=0xE0100 then + c2 = c2 - 0xE00FF + if maxcid<c3 then maxcid = c3 end + t[c3] = c2*0x200000+c1 + end + end + s = f:read() +end +f:close() + +for i=1,maxcid do + print(' ' .. tostring(t[i] or false) .. ',') +end + + +-- ( echo 'luatexja.otf.ivd_aj1 = {' ; grep 'Adobe-Japan1' IVD_Sequences.txt|sed 's/\([0-9A-F][0-9A-F]*\) \([0-9A-F][0-9A-F]*\)\;.*CID.\([0-9][0-9]*\)$/[\3]=\{0x\1,0x\2\},/' ; echo '}' ) +print([[}}]]) + diff --git a/Master/texmf-dist/source/luatex/luatexja/tool/jisx0208table.tex b/Master/texmf-dist/source/luatex/luatexja/tool/table_jisx0208.lua index f3de6b982ec..f3de6b982ec 100644 --- a/Master/texmf-dist/source/luatex/luatexja/tool/jisx0208table.tex +++ b/Master/texmf-dist/source/luatex/luatexja/tool/table_jisx0208.lua |