texlive[57652] Build/source/texk/web2c: sync

[commits+karl at tug.org]

Revision: 57652
          http://tug.org/svn/texlive?view=revision&revision=57652
Author:   karl
Date:     2021-02-07 00:44:49 +0100 (Sun, 07 Feb 2021)
Log Message:
-----------
sync \tracingparagraphs...\hss DEK fix in pdftex and xetex

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/ChangeLog
    trunk/Build/source/texk/web2c/pdftexdir/ChangeLog
    trunk/Build/source/texk/web2c/pdftexdir/pdftex.web
    trunk/Build/source/texk/web2c/xetexdir/ChangeLog
    trunk/Build/source/texk/web2c/xetexdir/xetex.web

Modified: trunk/Build/source/texk/web2c/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/ChangeLog	2021-02-06 22:54:11 UTC (rev 57651)
+++ trunk/Build/source/texk/web2c/ChangeLog	2021-02-06 23:44:49 UTC (rev 57652)
@@ -1,3 +1,7 @@
+2021-02-05  Karl Berry  <karl at freefriends.org>
+
+	* mf.ch: adjust for latest fixes.
+
 2021-02-05  Donald Knuth  <tex-k at tug.org>
 
 	* mf.web,

Modified: trunk/Build/source/texk/web2c/pdftexdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/pdftexdir/ChangeLog	2021-02-06 22:54:11 UTC (rev 57651)
+++ trunk/Build/source/texk/web2c/pdftexdir/ChangeLog	2021-02-06 23:44:49 UTC (rev 57652)
@@ -1,3 +1,7 @@
+2021-02-06  Akira Kakuto  <kakuto at w32tex.org>
+
+	* pdftex.web: sync \tracingparagraphs fix from tex.web.
+
 2021-01-28  Marcel Fabian Krueger  <tex at 2krueger.de>
 
 	* tounicode.c ((un)dumptounicode): use integer, not size_t,

Modified: trunk/Build/source/texk/web2c/pdftexdir/pdftex.web
===================================================================
--- trunk/Build/source/texk/web2c/pdftexdir/pdftex.web	2021-02-06 22:54:11 UTC (rev 57651)
+++ trunk/Build/source/texk/web2c/pdftexdir/pdftex.web	2021-02-06 23:44:49 UTC (rev 57652)
@@ -1902,8 +1902,7 @@
 
 \hang|term_only| (when |interaction>batch_mode| and |log_file| not yet open);
 
-\hang|log_only| (when |interaction=batch_mode| and |log_file| is open,
-  or when tracing paragraphs);
+\hang|log_only| (when |interaction=batch_mode| and |log_file| is open);
 
 \hang|term_and_log| (when |interaction>batch_mode| and |log_file| is open).
 
@@ -2019,7 +2018,7 @@
   {used to save global variables when deleting tokens}
 begin if history<error_message_issued then history:=error_message_issued;
 print_char("."); show_context;
-if interaction=error_stop_mode then if selector<>log_only then
+if interaction=error_stop_mode then
   @<Get user's advice and |return|@>;
 incr(error_count);
 if error_count=100 then
@@ -24288,6 +24287,7 @@
 var q:pointer; {new glue specification}
 begin if no_shrink_error_yet then
   begin no_shrink_error_yet:=false;
+  @!stat if tracing_paragraphs>0 then end_diagnostic(true);@+tats@;
   print_err("Infinite glue shrinkage found in a paragraph");
 @.Infinite glue shrinkage...@>
   help5("The paragraph just ended includes some glue that has")@/
@@ -24296,6 +24296,7 @@
   ("of any length to fit on one line. But it's safe to proceed,")@/
   ("since the offensive shrinkability has been made finite.");
   error;
+  @!stat if tracing_paragraphs>0 then begin_diagnostic;@+tats@;
   end;
 q:=new_spec(p); shrink_order(q):=normal;
 delete_glue_ref(p); finite_shrink:=q;

Modified: trunk/Build/source/texk/web2c/xetexdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/xetexdir/ChangeLog	2021-02-06 22:54:11 UTC (rev 57651)
+++ trunk/Build/source/texk/web2c/xetexdir/ChangeLog	2021-02-06 23:44:49 UTC (rev 57652)
@@ -1,3 +1,7 @@
+2021-02-06  Akira Kakuto  <kakuto at w32tex.org>
+
+	* xetex.web: sync \tracingparagraphs fix from tex.web.
+
 2020-10-13  Akira Kakuto  <kakuto at w32tex.org>
 
 	* xetexextra.c: Sync with W32 sources.

Modified: trunk/Build/source/texk/web2c/xetexdir/xetex.web
===================================================================
--- trunk/Build/source/texk/web2c/xetexdir/xetex.web	2021-02-06 22:54:11 UTC (rev 57651)
+++ trunk/Build/source/texk/web2c/xetexdir/xetex.web	2021-02-06 23:44:49 UTC (rev 57652)
@@ -1994,8 +1994,7 @@
 
 \hang|term_only| (when |interaction>batch_mode| and |log_file| not yet open);
 
-\hang|log_only| (when |interaction=batch_mode| and |log_file| is open,
-  or when tracing paragraphs);
+\hang|log_only| (when |interaction=batch_mode| and |log_file| is open);
 
 \hang|term_and_log| (when |interaction>batch_mode| and |log_file| is open).
 
@@ -2111,7 +2110,7 @@
   {used to save global variables when deleting tokens}
 begin if history<error_message_issued then history:=error_message_issued;
 print_char("."); show_context;
-if interaction=error_stop_mode then if selector<>log_only then
+if interaction=error_stop_mode then
   @<Get user's advice and |return|@>;
 incr(error_count);
 if error_count=100 then
@@ -19916,6 +19915,7 @@
 var q:pointer; {new glue specification}
 begin if no_shrink_error_yet then
   begin no_shrink_error_yet:=false;
+  @!stat if tracing_paragraphs>0 then end_diagnostic(true);@+tats@;
   print_err("Infinite glue shrinkage found in a paragraph");
 @.Infinite glue shrinkage...@>
   help5("The paragraph just ended includes some glue that has")@/
@@ -19924,6 +19924,7 @@
   ("of any length to fit on one line. But it's safe to proceed,")@/
   ("since the offensive shrinkability has been made finite.");
   error;
+  @!stat if tracing_paragraphs>0 then begin_diagnostic;@+tats@;
   end;
 q:=new_spec(p); shrink_order(q):=normal;
 delete_glue_ref(p); finite_shrink:=q;