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

New escaping system

Browse source
This commit is contained in:
Marcel Krüger 2020-06-07 22:42:53 +02:00
parent f3af2599da
commit e75211162c
5 changed files with 98 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

9
luametalatex-pdf-nametree.lua
View file

@ -14,10 +14,9 @@ local function write(pdf, tree, escaped, step)
move(tree, #tree+1, 2*#tree-nextcount, nextcount+1)
return write(pdf, tree, escaped, step*6)
end
local function pdf_string(s)
-- Emulate other engines here: If looks like an escaped string, treat it as such. Otherwise, add parenthesis.
return s:match("^%(.*%)$") or s:match("^<.*>$") or '(' .. s .. ')'
end
local pdf_bytestring = require'luametalatex-pdf-escape'.escape_bytes
local serialized = {}
return function(values, pdf)
local tree = {}
@ -35,7 +34,7 @@ return function(values, pdf)
local key = tree[6*i+j]
if key then
local value = values[key]
key = pdf_string(key)
key = pdf_bytestring(key)
tree[6*i+j] = key
serialized[2*j-1] = key
serialized[2*j] = value