diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2015-08-06 08:49:49 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2015-08-06 08:49:49 +0000 |
commit | e93b86c4e1b5c8621d01b19e36a50bb2aee7e9ee (patch) | |
tree | 2dca2c7d442cfdd2b70766ca20ea5d8128d5112c /Build/source/texk/web2c/euptexdir/pdfstrcmp-eup-post.ch | |
parent | d7293e533b11c4b1d32619f77f97e1e17730faf8 (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.ch | 11 |
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 |