eptexdir/etex.ch1: same fix as r47096 for \lastnodesubtype (H. Kitagawa)

git-svn-id: svn://tug.org/texlive/trunk@47100 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 18 insertions, 0 deletions

diff --git a/Build/source/texk/web2c/eptexdir/ChangeLog b/Build/source/texk/web2c/eptexdir/ChangeLog
index 9cbf38b1359..9545ce8dd62 100644
--- a/Build/source/texk/web2c/eptexdir/ChangeLog
+++ b/Build/source/texk/web2c/eptexdir/ChangeLog
@@ -1,3 +1,10 @@
+2018-03-24  Hironori Kitagawa  <h_kitagawa2001@yahoo.co.jp>
+            Hironobu Yamashita <h.y.acetaminophen@gmail.com>
+
+	* etex.ch1: Recover the right \lastnodesubtype initialization
+	value ignored by tex.ch.
+	* eptex.ech: Describe \lastnodesubtype.
+
 2018-02-26  Hironori Kitagawa  <h_kitagawa2001@yahoo.co.jp>
 
 	* eptex.ech, eptex_version.h: e-pTeX version 180226.
diff --git a/Build/source/texk/web2c/eptexdir/eptex.ech b/Build/source/texk/web2c/eptexdir/eptex.ech
index 9a180515b7a..5ab7d5da55e 100644
--- a/Build/source/texk/web2c/eptexdir/eptex.ech
+++ b/Build/source/texk/web2c/eptexdir/eptex.ech
@@ -5,6 +5,9 @@
 %%
 %% \lastnodechar: the (internal) character code of the last node
 %%   -1: non-character or null
+%% \lastnodesubtype: the (internal) subtype of the last node
+%%   -1: null
+%%   fallback to 0 if not explicitly set
 
 
 @x e-pTeX: logo
diff --git a/Build/source/texk/web2c/eptexdir/etex.ch1 b/Build/source/texk/web2c/eptexdir/etex.ch1
index 965465cd919..94415743937 100644
--- a/Build/source/texk/web2c/eptexdir/etex.ch1
+++ b/Build/source/texk/web2c/eptexdir/etex.ch1
@@ -7,6 +7,14 @@
     begin print_direction_alt(box_dir(p));
 @z
 
+@x [16.215] - e-pTeX last_node_subtype
+last_glue:=max_halfword; last_penalty:=0; last_kern:=0;
+last_node_type:=-1;
+@y
+last_glue:=max_halfword; last_penalty:=0; last_kern:=0;
+last_node_type:=-1; last_node_subtype:=-1;
+@z
+
 @x [17.236]
 @d int_pars=63 {total number of integer parameters}
 @d count_base=int_base+int_pars {256 user \.{\\count} registers}