summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/euptexdir/pdfstrcmp-eup-post.ch
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2015-08-06 08:49:49 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2015-08-06 08:49:49 +0000
commite93b86c4e1b5c8621d01b19e36a50bb2aee7e9ee (patch)
tree2dca2c7d442cfdd2b70766ca20ea5d8128d5112c /Build/source/texk/web2c/euptexdir/pdfstrcmp-eup-post.ch
parentd7293e533b11c4b1d32619f77f97e1e17730faf8 (diff)
e-(u)pTeX: Add primitives \pdfprimitive and \ifpdfprimitive (from Hironori Kitagawa)
git-svn-id: svn://tug.org/texlive/trunk@38060 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/euptexdir/pdfstrcmp-eup-post.ch')
-rw-r--r--Build/source/texk/web2c/euptexdir/pdfstrcmp-eup-post.ch11
1 files changed, 11 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/euptexdir/pdfstrcmp-eup-post.ch b/Build/source/texk/web2c/euptexdir/pdfstrcmp-eup-post.ch
index 939ccb12a74..16752d25b5f 100644
--- a/Build/source/texk/web2c/euptexdir/pdfstrcmp-eup-post.ch
+++ b/Build/source/texk/web2c/euptexdir/pdfstrcmp-eup-post.ch
@@ -1,4 +1,15 @@
@x
+ cur_tok := (cur_cmd*@'400)+cur_chr;
+@y
+ cur_tok := (cur_cmd*max_char_val)+cur_chr;
+@z
+@x
+ cur_tok := (cur_cmd*@'400)+cur_chr;
+@y
+ cur_tok := (cur_cmd*max_char_val)+cur_chr;
+@z
+
+@x
procedure print_kanji(@!s:integer); {prints a single character}
begin
if s>255 then begin