texlive[64787] Build/source/texk/web2c/eptexdir: ptex-base.ch:

[commits+hironobu at tug.org]

Revision: 64787
          http://tug.org/svn/texlive?view=revision&revision=64787
Author:   hironobu
Date:     2022-10-23 02:37:47 +0200 (Sun, 23 Oct 2022)
Log Message:
-----------
ptex-base.ch: initialize l in prim_lookup (Y. Morimi)

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/eptexdir/ChangeLog
    trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch

Modified: trunk/Build/source/texk/web2c/eptexdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/ChangeLog	2022-10-23 00:23:12 UTC (rev 64786)
+++ trunk/Build/source/texk/web2c/eptexdir/ChangeLog	2022-10-23 00:37:47 UTC (rev 64787)
@@ -1,3 +1,8 @@
+2022-10-23  Hironobu Yamashita  <h.y.acetaminophen at gmail.com>
+
+	* pdfutils.ch: Import a patch (2021-06-25 @h20y6m) to
+	  avoid access to uninitialized variables.
+
 2022-07-17  Andreas Scherer  <https://ascherer.github.io>
 
 	* pdfutils.ch: Adapt to upstream tex.ch.

Modified: trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch
===================================================================
--- trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch	2022-10-23 00:23:12 UTC (rev 64786)
+++ trunk/Build/source/texk/web2c/eptexdir/pdfutils.ch	2022-10-23 00:37:47 UTC (rev 64787)
@@ -549,6 +549,7 @@
 if s<=biggest_char then begin
   if s<0 then begin p:=undefined_primitive; goto found; end
   else p:=(s mod prim_prime)+prim_base; {we start searching here}
+  l:=1
   end
 else begin
   j:=str_start[s];