summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/pdftexdir/pdftex.web
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2019-01-27 17:58:33 +0000
committerKarl Berry <karl@freefriends.org>2019-01-27 17:58:33 +0000
commit26018324f721b0c1e8dabef2253c941a26574f6a (patch)
tree29270564a6b7581bfb8e1c7039696eef97b9ccc8 /Build/source/texk/web2c/pdftexdir/pdftex.web
parentb9c0301ba579a3f12913ac93eca8019e21d7cdb9 (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.web15
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;