diff options
author | Philipp Gesang <phg42.2a@gmail.com> | 2014-01-06 12:03:13 -0800 |
---|---|---|
committer | Philipp Gesang <phg42.2a@gmail.com> | 2014-01-06 12:03:13 -0800 |
commit | bb8ee997db8486468c23a985a0b207697b250b62 (patch) | |
tree | a4c38d1174021fc9c797f5cd4242ad1d369d370e /tests/pln-aux-4.tex | |
parent | 70e80bb79416b0089ea9ee5f01a11be34bef251c (diff) | |
parent | 1d16a614853476a8cc00f06a4f018e515b175b8d (diff) | |
download | luaotfload-bb8ee997db8486468c23a985a0b207697b250b62.tar.gz |
Merge pull request #175 from phi-gamma/texlive2014
import dev branch
Diffstat (limited to 'tests/pln-aux-4.tex')
-rw-r--r-- | tests/pln-aux-4.tex | 41 |
1 files changed, 0 insertions, 41 deletions
diff --git a/tests/pln-aux-4.tex b/tests/pln-aux-4.tex deleted file mode 100644 index 80ffc0b..0000000 --- a/tests/pln-aux-4.tex +++ /dev/null @@ -1,41 +0,0 @@ -\input luaotfload.sty - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% unicode character mappings -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - -\font\ptserifregular = file:PTF55F.ttf \ptserifregular - -%% here we map the function luaotfload.aux.name_of_slot -%% on a short text, printing a list of letters, their -%% code points and names (as specified in the Adobe -%% Glyph List). - -\directlua{ - local aux = luaotfload.aux - local cbk = function (str) - if string.match(str, "^EOF") then - luatexbase.remove_from_callback("process_input_buffer", "weird") - return [[the end!]] - end - local res = { } - for chr in string.utfcharacters(str) do - local val = unicode.utf8.byte(chr) - local line = chr .. " <> " .. tostring(val) - line = line .. " <> " .. (aux.name_of_slot(val) or "") - res[\string#res+1] = line - end - return table.concat(res, [[\endgraf]]) - end - - luatexbase.add_to_callback("process_input_buffer", cbk, "weird") -} - -Я узнал что у меня -Есть огромная семья -И тропинка и лесок -В поле каждый колосок - -EOF - -\bye |