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