texlive[42381] Build/source/texk/web2c/eptexdir: eptexdir: Use

[commits+kakuto at tug.org]

Revision: 42381
          http://tug.org/svn/texlive?view=revision&revision=42381
Author:   kakuto
Date:     2016-10-30 14:44:27 +0100 (Sun, 30 Oct 2016)
Log Message:
-----------
eptexdir: Use initstarttime() to improve CreationDate (patch by H. Kitagawa)

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/eptexdir/ChangeLog
    trunk/Build/source/texk/web2c/eptexdir/eptex.defines
    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	2016-10-30 13:37:46 UTC (rev 42380)
+++ trunk/Build/source/texk/web2c/eptexdir/ChangeLog	2016-10-30 13:44:27 UTC (rev 42381)
@@ -1,3 +1,8 @@
+2016-10-30  Hironori Kitagawa  <h_kitagawa2001 at yahoo.co.jp>
+
+	* eptex.defines, eptex.ech, eptex_version.h, pdfutils.ch:
+	Use initstarttime() to improve CreationDate.
+
 2016-09-12  Hironori Kitagawa  <h_kitagawa2001 at yahoo.co.jp>
 
 	* eptex.ech, pdfutils.ch: Realize better box in math mode.

Modified: trunk/Build/source/texk/web2c/eptexdir/eptex.defines
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/eptex.defines	2016-10-30 13:37:46 UTC (rev 42380)
+++ trunk/Build/source/texk/web2c/eptexdir/eptex.defines	2016-10-30 13:44:27 UTC (rev 42381)
@@ -39,6 +39,7 @@
 @define function getintone ();
 @define procedure setintone ();
 
+ at define procedure initstarttime;
 @define procedure getcreationdate;
 @define procedure getfilemoddate();
 @define procedure getfilesize();

Modified: trunk/Build/source/texk/web2c/eptexdir/eptex.ech
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/eptex.ech	2016-10-30 13:37:46 UTC (rev 42380)
+++ trunk/Build/source/texk/web2c/eptexdir/eptex.ech	2016-10-30 13:44:27 UTC (rev 42381)
@@ -19,7 +19,7 @@
 @y
 @d eTeX_version_string=='-2.6' {current \eTeX\ version}
 @#
- at d epTeX_version_string=='-160201'
+ at d epTeX_version_string=='-161030'
 @z
 
 @x e-pTeX: banner

Modified: trunk/Build/source/texk/web2c/eptexdir/eptex_version.h
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/eptex_version.h	2016-10-30 13:37:46 UTC (rev 42380)
+++ trunk/Build/source/texk/web2c/eptexdir/eptex_version.h	2016-10-30 13:44:27 UTC (rev 42381)
@@ -1 +1 @@
-#define EPTEX_VERSION "160201"
+#define EPTEX_VERSION "161030"

Modified: trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch	2016-10-30 13:37:46 UTC (rev 42380)
+++ trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch	2016-10-30 13:44:27 UTC (rev 42381)
@@ -1061,5 +1061,8 @@
         flush_string;
 end;
 
+@ @<Set initial values of key variables@>=
+  init_start_time;
+
 @* \[54] System-dependent changes.
 @z