diff options
author | Karl Berry <karl@freefriends.org> | 2019-01-27 17:58:33 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2019-01-27 17:58:33 +0000 |
commit | 26018324f721b0c1e8dabef2253c941a26574f6a (patch) | |
tree | 29270564a6b7581bfb8e1c7039696eef97b9ccc8 /Build/source/texk/web2c/pdftexdir/pdftex.web | |
parent | b9c0301ba579a3f12913ac93eca8019e21d7cdb9 (diff) |
\pdfincludecharset parameter, pdftex r812
git-svn-id: svn://tug.org/texlive/trunk@49832 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/pdftexdir/pdftex.web')
-rw-r--r-- | Build/source/texk/web2c/pdftexdir/pdftex.web | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/pdftexdir/pdftex.web b/Build/source/texk/web2c/pdftexdir/pdftex.web index 78b9ecd70ce..82875c247ec 100644 --- a/Build/source/texk/web2c/pdftexdir/pdftex.web +++ b/Build/source/texk/web2c/pdftexdir/pdftex.web @@ -5692,7 +5692,8 @@ that will be defined later. @d pdf_suppress_warning_page_group_code = pdftex_first_integer_code + 29 {suppress warning about multiple pdfs with page group} @d pdf_info_omit_date_code = pdftex_first_integer_code + 30 {omit generating CreationDate and ModDate} @d pdf_suppress_ptex_info_code = pdftex_first_integer_code + 31 {suppress /PTEX.* entries in PDF dictionaries} -@d pdf_int_pars=pdftex_first_integer_code + 32 {total number of \pdfTeX's integer parameters} +@d pdf_include_charset_code = pdftex_first_integer_code + 32 {suppress /PTEX.* entries in PDF dictionaries} +@d pdf_int_pars=pdftex_first_integer_code + 33 {total number of \pdfTeX's integer parameters} @# @d etex_int_base=pdf_int_pars {base for \eTeX's integer parameters} @d tracing_assigns_code=etex_int_base {show assignments} @@ -5803,6 +5804,7 @@ that will be defined later. @d pdf_suppress_warning_page_group == int_par(pdf_suppress_warning_page_group_code) @d pdf_info_omit_date == int_par(pdf_info_omit_date_code) @d pdf_suppress_ptex_info == int_par(pdf_suppress_ptex_info_code) +@d pdf_include_charset == int_par(pdf_include_charset_code) @# @d tracing_assigns==int_par(tracing_assigns_code) @d tracing_groups==int_par(tracing_groups_code) @@ -5910,6 +5912,7 @@ pdf_suppress_warning_dup_map_code: print_esc("pdfsuppresswarningdupmap"); pdf_suppress_warning_page_group_code:print_esc("pdfsuppresswarningpagegroup"); pdf_info_omit_date_code:print_esc("pdfinfoomitdate"); pdf_suppress_ptex_info_code: print_esc("pdfsuppressptexinfo"); +pdf_include_charset_code: print_esc("pdfincludecharset"); @/@<Cases for |print_param|@>@/ othercases print("[unknown integer parameter!]") endcases; @@ -6096,11 +6099,16 @@ primitive("pdfsuppresswarningdupmap",assign_int,int_base+pdf_suppress_warning_du primitive("pdfsuppresswarningpagegroup",assign_int,int_base+pdf_suppress_warning_page_group_code);@/ @!@:pdf_suppress_warning_page_group_}{\.{\\pdfsuppresswarningpagegroup} primitive@> + primitive("pdfinfoomitdate",assign_int,int_base+pdf_info_omit_date_code);@/ @!@:pdf_info_omit_date_}{\.{\\pdfinfoomitdate} primitive@> + primitive("pdfsuppressptexinfo",assign_int,int_base+pdf_suppress_ptex_info_code);@/ @!@:pdf_suppress_ptex_info_}{\.{\\pdfsuppressptexinfo} primitive@> +primitive("pdfincludecharset",assign_int,int_base+pdf_include_charset_code);@/ +@!@:pdf_include_charset}{\.{\\pdfincludecharset} primitive@> + @ @<Cases of |print_cmd_chr|...@>= assign_int: if chr_code<count_base then print_param(chr_code-int_base) else begin print_esc("count"); print_int(chr_code-count_base); @@ -15104,6 +15112,11 @@ begin get_pdf_suppress_ptex_info := pdf_suppress_ptex_info; end; +function get_pdf_include_charset: integer; +begin + get_pdf_include_charset := pdf_include_charset; +end; + function get_nullfont: internal_font_number; begin get_nullfont := null_font; |