diff options
author | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-09-05 11:09:19 +0200 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-09-05 11:09:19 +0200 |
commit | 3f59c56887a9a6c4bda68ab8d99e67d2afc902f9 (patch) | |
tree | a9198041a82c94d3764733271e203edb8beb79a3 /tex/context/base/mkiv/lpdf-ini.lua | |
parent | c209ed36b6aaaa992df8976789c8ba8112f8e5c5 (diff) | |
download | context-3f59c56887a9a6c4bda68ab8d99e67d2afc902f9.tar.gz |
2016-09-05 10:33:00
Diffstat (limited to 'tex/context/base/mkiv/lpdf-ini.lua')
-rw-r--r-- | tex/context/base/mkiv/lpdf-ini.lua | 51 |
1 files changed, 0 insertions, 51 deletions
diff --git a/tex/context/base/mkiv/lpdf-ini.lua b/tex/context/base/mkiv/lpdf-ini.lua index a0413dbcd..f395a32f9 100644 --- a/tex/context/base/mkiv/lpdf-ini.lua +++ b/tex/context/base/mkiv/lpdf-ini.lua @@ -312,59 +312,8 @@ local f_array = formatters["[ % t ]"] local f_key_number = formatters["/%s %F"] local f_tonumber = formatters["%F"] --- local f_key_value = formatters["/%s %s"] --- local f_key_dictionary = formatters["/%s <<% t>>"] --- local f_dictionary = formatters["<<% t>>"] --- local f_key_array = formatters["/%s [% t]"] --- local f_array = formatters["[% t]"] - local tostring_a, tostring_d --- tostring_d = function(t,contentonly,key) --- if next(t) then --- local r, rn = { }, 0 --- for k, v in next, t do --- -- for k, v in sortedhash(t) do -- can be an option --- rn = rn + 1 --- local tv = type(v) --- if tv == "string" then --- r[rn] = f_key_value(k,toeight(v)) --- elseif tv == "number" then --- r[rn] = f_key_number(k,v) --- -- elseif tv == "unicode" then -- can't happen --- -- r[rn] = f_key_value(k,tosixteen(v)) --- elseif tv == "table" then --- local mv = getmetatable(v) --- if mv and mv.__lpdftype then --- -- if v == t then --- -- report_objects("ignoring circular reference in dirctionary") --- -- r[rn] = f_key_null(k) --- -- else --- r[rn] = f_key_value(k,tostring(v)) --- -- end --- elseif v[1] then --- r[rn] = f_key_value(k,tostring_a(v)) --- else --- r[rn] = f_key_value(k,tostring_d(v)) --- end --- else --- r[rn] = f_key_value(k,tostring(v)) --- end --- end --- if contentonly then --- return concat(r," ") --- elseif key then --- return f_key_dictionary(key,r) --- else --- return f_dictionary(r) --- end --- elseif contentonly then --- return "" --- else --- return "<< >>" --- end --- end - tostring_d = function(t,contentonly,key) if next(t) then local r, n = { }, 0 |