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

Fix typos and add parameters

Browse Source
This commit is contained in:
Marcel Krüger 2019-07-25 13:17:38 +02:00
parent 2e1616f18c
commit 29c97800a3
3 changed files with 18 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
luametalatex-back-pdf.lua
View File

@ -59,7 +59,7 @@ callback.register("stop_run", function()
end
pfile.root = pfile:getobj()
pfile.version = string.format("%i.%i", pdf.variable.majorversion, pdf.variable.minorversion)
pfile:indirect(pfile.root, string.format([[<</Type/Catalog/Version/%i.%i/Pages %i 0 R>>]], pfile.version, pfile:writepages()))
pfile:indirect(pfile.root, string.format([[<</Type/Catalog/Version/%s/Pages %i 0 R>>]], pfile.version, pfile:writepages()))
pfile.info = write_infodir(pfile)
pfile:close()
end, "Finish PDF file")

20
luametalatex-baseregisters.tex
View File

@ -8,6 +8,7 @@
return token.new(t.mode, t.command)
end
local dimen_cmd = token.command_id'assign_dimen'
local count_cmd = token.command_id'assign_int'
local tex_params = {}
local texmeta = getmetatable(tex)
local texmetaoldindex = texmeta.__index
@ -15,7 +16,9 @@
function texmeta.__index(t, k)
local v = tex_params[k]
if v then
if v.command == dimen_cmd then
if v.command == count_cmd then
return tex.count[v.index]
elseif v.command == dimen_cmd then
return tex.dimen[v.index]
end
else
@ -25,7 +28,9 @@
function texmeta.__newindex(t, k, v)
local p = tex_params[k]
if p then
if p.command == dimen_cmd then
if p.command == count_cmd then
tex.count[p.index] = v
elseif p.command == dimen_cmd then
tex.dimen[p.index] = v
end
else
@ -38,7 +43,9 @@
__index = function(t, k)
local v = pdf_params[k]
if v then
if v.command == dimen_cmd then
if v.command == count_cmd then
return tex.count[v.index]
elseif v.command == dimen_cmd then
return tex.dimen[v.index]
end
else
@ -48,7 +55,9 @@
__newindex = function(t, k, v)
local p = pdf_params[k]
if p then
if p.command == dimen_cmd then
if p.command == count_cmd then
tex.count[p.index] = v
elseif p.command == dimen_cmd then
tex.dimen[p.index] = v
end
else
@ -71,6 +80,7 @@
\def\pdfAlloc{%
\internalAlloc{pdf}%
}
\texAlloc{count}{suppressfontnotfounderror}{0}
\texAlloc{count}{outputmode}{1} % The "traditional" default would be 0,
% but we do not actually support that.
\texAlloc{dimen}{pageheight}{210mm}
@ -78,7 +88,7 @@
\pdfAlloc{dimen}{horigin}{1in}
\pdfAlloc{dimen}{vorigin}{1in}
\pdfAlloc{count}{majorversion}{1}
\pdfAlloc{dimen}{minorversion}{7}
\pdfAlloc{count}{minorversion}{7}
\directlua{
lua.prepared_code[\csstring#lua.prepared_code+1] = tex.toks[0] .. "end"
\the\toks0

3
luametalatex-firstcode.lua
View File

@ -13,6 +13,7 @@ function token.luacmd(name, func, ...)
local idx = new_luafunction(name)
set_lua(name, idx, ...)
functions[idx] = func
return idx
end
local properties = node.get_properties_table()
-- setmetatable(node.direct.get_properties_table(), {
@ -28,7 +29,7 @@ local whatsits = {
[0] = "open",
"write",
"close",
nil,
"special",
nil,
nil,
"save_pos",