texlive[47745] Build/source/texk/web2c/eptexdir: eptexdir: new
commits+hironobu at tug.org
commits+hironobu at tug.org
Fri May 18 18:27:42 CEST 2018
Revision: 47745
http://tug.org/svn/texlive?view=revision&revision=47745
Author: hironobu
Date: 2018-05-18 18:27:41 +0200 (Fri, 18 May 2018)
Log Message:
-----------
eptexdir: new primitive \expanded from pdfTeX
Modified Paths:
--------------
trunk/Build/source/texk/web2c/eptexdir/ChangeLog
trunk/Build/source/texk/web2c/eptexdir/eptex-base.ch
trunk/Build/source/texk/web2c/eptexdir/eptex.ech
trunk/Build/source/texk/web2c/eptexdir/eptex_version.h
trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch
Modified: trunk/Build/source/texk/web2c/eptexdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/ChangeLog 2018-05-18 00:24:00 UTC (rev 47744)
+++ trunk/Build/source/texk/web2c/eptexdir/ChangeLog 2018-05-18 16:27:41 UTC (rev 47745)
@@ -1,3 +1,9 @@
+2018-05-18 Joseph Wright <joseph.wright at morningstar2.co.uk>
+ Hironori Kitagawa <h_kitagawa2001 at yahoo.co.jp>
+
+ * eptex-base.ch, pdfutils.ch: New primitive \expanded
+ * eptex.ech, eptex_version.h: e-pTeX version 180518.
+
2018-03-24 Hironori Kitagawa <h_kitagawa2001 at yahoo.co.jp>
Hironobu Yamashita <h.y.acetaminophen at gmail.com>
Modified: trunk/Build/source/texk/web2c/eptexdir/eptex-base.ch
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/eptex-base.ch 2018-05-18 00:24:00 UTC (rev 47744)
+++ trunk/Build/source/texk/web2c/eptexdir/eptex-base.ch 2018-05-18 16:27:41 UTC (rev 47745)
@@ -22,8 +22,7 @@
% + eptexdir/eptex.ech e-TeX+pTeX changes
% + eptexdir/etex.ch1 glue
% + eptexdir/fam256.ch borrowed from Omega
-% + eptexdir/pdfstrcmp.ch borrowed from pdfTeX
-% + eptexdir/pdfsavepos.ch borrowed from pdfTeX
+% + eptexdir/pdfutils.ch borrowed from pdfTeX
% + tex-binpool.ch compiled pool file
%
% where the three small files denoted as glue resolve incompatibilities
Modified: trunk/Build/source/texk/web2c/eptexdir/eptex.ech
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/eptex.ech 2018-05-18 00:24:00 UTC (rev 47744)
+++ trunk/Build/source/texk/web2c/eptexdir/eptex.ech 2018-05-18 16:27:41 UTC (rev 47745)
@@ -22,8 +22,8 @@
@y
@d eTeX_version_string=='-2.6' {current \eTeX\ version}
@#
- at d epTeX_version_string=='-180226'
- at d epTeX_version_number==180226
+ at d epTeX_version_string=='-180518'
+ at d epTeX_version_number==180518
@z
@x e-pTeX: banner
Modified: trunk/Build/source/texk/web2c/eptexdir/eptex_version.h
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/eptex_version.h 2018-05-18 00:24:00 UTC (rev 47744)
+++ trunk/Build/source/texk/web2c/eptexdir/eptex_version.h 2018-05-18 16:27:41 UTC (rev 47745)
@@ -1 +1 @@
-#define EPTEX_VERSION "180226"
+#define EPTEX_VERSION "180518"
Modified: trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch 2018-05-18 00:24:00 UTC (rev 47744)
+++ trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch 2018-05-18 16:27:41 UTC (rev 47745)
@@ -793,22 +793,38 @@
@x
@d etex_convert_codes=etex_convert_base+1 {end of \eTeX's command codes}
+ at d job_name_code=etex_convert_codes {command code for \.{\\jobname}}
@y
- at d pdf_strcmp_code = etex_convert_base+1 {command code for \.{\\pdfstrcmp}}
- at d pdf_creation_date_code = etex_convert_base+2 {command code for \.{\\pdfcreationdate}}
- at d pdf_file_mod_date_code = etex_convert_base+3 {command code for \.{\\pdffilemoddate}}
- at d pdf_file_size_code = etex_convert_base+4 {command code for \.{\\pdffilesize}}
- at d pdf_mdfive_sum_code = etex_convert_base+5 {command code for \.{\\pdfmdfivesum}}
- at d pdf_file_dump_code = etex_convert_base+6 {command code for \.{\\pdffiledump}}
- at d uniform_deviate_code = etex_convert_base+7 {command code for \.{\\pdfuniformdeviate}}
- at d normal_deviate_code = etex_convert_base+8 {command code for \.{\\pdfnormaldeviate}}
- at d etex_convert_codes=etex_convert_base+9 {end of \eTeX's command codes}
+ at d etex_convert_codes=etex_convert_base+1 {end of \eTeX's command codes}
+ at d expanded_code = etex_convert_codes {command code for \.{\\expanded}}
+ at d pdf_first_expand_code = expanded_code + 1 {base for \pdfTeX-like command codes}
+ at d pdf_strcmp_code = pdf_first_expand_code+0 {command code for \.{\\pdfstrcmp}}
+ at d pdf_creation_date_code = pdf_first_expand_code+1 {command code for \.{\\pdfcreationdate}}
+ at d pdf_file_mod_date_code = pdf_first_expand_code+2 {command code for \.{\\pdffilemoddate}}
+ at d pdf_file_size_code = pdf_first_expand_code+3 {command code for \.{\\pdffilesize}}
+ at d pdf_mdfive_sum_code = pdf_first_expand_code+4 {command code for \.{\\pdfmdfivesum}}
+ at d pdf_file_dump_code = pdf_first_expand_code+5 {command code for \.{\\pdffiledump}}
+ at d uniform_deviate_code = pdf_first_expand_code+6 {command code for \.{\\pdfuniformdeviate}}
+ at d normal_deviate_code = pdf_first_expand_code+7 {command code for \.{\\pdfnormaldeviate}}
+ at d pdf_convert_codes = pdf_first_expand_code+8 {end of \pdfTeX-like command codes}
+ at d job_name_code=pdf_convert_codes {command code for \.{\\jobname}}
@z
@x
+primitive("jobname",convert,job_name_code);@/
+ at y
+@#
+primitive("expanded",convert,expanded_code);@/
+@!@:expanded_}{\.{\\expanded} primitive@>
+@#
+primitive("jobname",convert,job_name_code);@/
+ at z
+
+ at x
eTeX_revision_code: print_esc("eTeXrevision");
@y
eTeX_revision_code: print_esc("eTeXrevision");
+ expanded_code: print_esc("expanded");
pdf_strcmp_code: print_esc("pdfstrcmp");
pdf_creation_date_code: print_esc("pdfcreationdate");
pdf_file_mod_date_code: print_esc("pdffilemoddate");
@@ -857,6 +873,20 @@
eTeX_revision_code: do_nothing;
@y
eTeX_revision_code: do_nothing;
+expanded_code:
+ begin
+ save_scanner_status := scanner_status;
+ save_warning_index := warning_index;
+ save_def_ref := def_ref;
+ save_cur_string;
+ scan_pdf_ext_toks;
+ warning_index := save_warning_index;
+ scanner_status := save_scanner_status;
+ ins_list(link(def_ref));
+ def_ref := save_def_ref;
+ restore_cur_string;
+ return;
+ end;
pdf_strcmp_code:
begin
save_scanner_status := scanner_status;
More information about the tex-live-commits
mailing list