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

Add \latelua

This commit is contained in:
Marcel Krüger 2020-07-12 19:56:50 +02:00
parent 5df4d5dd84
commit 510173db71
1 changed files with 19 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
luametalatex-firstcode.lua
View File

@ -104,6 +104,25 @@ token.luacmd("write", function(_, immediate) -- \write
node.direct.write(whatsit)
end
end, "protected")
local late_lua_whatsit = new_whatsit('late_lua', function(p, pfile, n, x, y)
local code = p.data
if not code then
code = token.to_string(p.token)
end
if type(code) == 'string' then
code = assert(load(code, nil, 't'))
elseif not code then
error[[Missing code in latelua]]
end
return pdf._latelua(pfile, x, y, code)
end)
token.luacmd("latelua", function(_) -- \latelua
local content = token.scan_tokenlist()
local props = {token = content}
local whatsit = node.direct.new(whatsit_id, late_lua_whatsit)
properties[whatsit] = props
node.direct.write(whatsit)
end, "protected")
local functions = lua.get_functions_table()
token.luacmd("immediate", function() -- \immediate