pdftex[829]

[commits+thanh at tug.org]

Revision: 829
          http://tug.org/svn/pdftex?view=revision&revision=829
Author:   thanh
Date:     2020-06-02 14:46:04 +0200 (Tue, 02 Jun 2020)
Log Message:
-----------
apply patch from Hironobu for "segfault with \pdfadjustinterwordglue"

Modified Paths:
--------------
    branches/stable/source/src/texk/web2c/pdftexdir/pdftex.web

Modified: branches/stable/source/src/texk/web2c/pdftexdir/pdftex.web
===================================================================
--- branches/stable/source/src/texk/web2c/pdftexdir/pdftex.web	2020-05-26 13:37:01 UTC (rev 828)
+++ branches/stable/source/src/texk/web2c/pdftexdir/pdftex.web	2020-06-02 12:46:04 UTC (rev 829)
@@ -4996,7 +4996,7 @@
 @<Set init...@>=
 nest_ptr:=0; max_nest_stack:=0;
 mode:=vmode; head:=contrib_head; tail:=contrib_head;
-eTeX_aux:=null;
+eTeX_aux:=null; save_tail:=null;
 prev_depth:=ignore_depth; mode_line:=0;
 prev_graf:=0; shown_mode:=0;
 @<Start a new current page@>;
@@ -17241,9 +17241,9 @@
             (save_tail <> null) then
     begin
         r := save_tail;
-        while (r <> null) and (link(r) <> null) and (link(r) <> p) do
+        while (link(r) <> null) and (link(r) <> p) do
             r := link(r);
-        if (r <> null) and (link(r) = p) then
+        if (link(r) = p) then
             set_char_and_font(r); {set |f| and |c| if |r| is a char or ligature}
     end;
     if (c = non_char) then