marcel/luametalatex
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Language "preloading"

Browse Source
This commit is contained in:
Marcel Krüger 2020-06-15 07:02:06 +02:00
parent 06b138f1e7
commit c8a96a987d
1 changed files with 30 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
luametalatex-init.lua
View File

@ -124,6 +124,36 @@ callback_register('handle_error_hook', function()
end) end)
callback_register('pre_dump', function() callback_register('pre_dump', function()
lua.prepared_code[1] = string.format("fixupluafunctions(%i)", fixupluafunctions()) lua.prepared_code[1] = string.format("fixupluafunctions(%i)", fixupluafunctions())
for i=0,0 do -- maybeFIXME: In practise only one language is preloaded in LuaTeX anyway
-- for i=0,tex.count[19] do -- Sometimes catches reserved language ids which are not used yet
-- for i=0,lang.new():id()-1 do -- lang.new():id() is always 0 in luametatex?!?
local l = lang.new(i)
local str = string.format("do \z
local l = lang.new(%i)\z
l:hyphenationmin(%i)\z
l:prehyphenchar(%i)\z
l:posthyphenchar(%i)\z
l:preexhyphenchar(%i)\z
l:postexhyphenchar(%i)",
i,
l:hyphenationmin(),
l:prehyphenchar(),
l:posthyphenchar(),
l:preexhyphenchar(),
l:postexhyphenchar())
local patterns = l:patterns()
local exceptions = l:hyphenation()
if patterns and exceptions then
str = string.format("%sl:patterns(%q)l:hyphenation(%q)end", str, patterns, exceptions)
elseif patterns then
str = string.format("%sl:patterns(%q)end", str, patterns)
elseif exceptions then
str = string.format("%sl:hyphenation(%q)end", str, exceptions)
else
str = str .. 'end'
end
lua.prepared_code[#lua.prepared_code+1] = str
end
lua.bytecode[1] = assert(load(table.concat(lua.prepared_code, ' '))) lua.bytecode[1] = assert(load(table.concat(lua.prepared_code, ' ')))
end) end)
function texconfig.init() function texconfig.init()