texlive[51154] Build/source/texk/web2c: increase trie_size and

commits+karl at tug.org commits+karl at tug.org
Sat May 18 18:09:28 CEST 2019


Revision: 51154
          http://tug.org/svn/texlive?view=revision&revision=51154
Author:   karl
Date:     2019-05-18 18:09:28 +0200 (Sat, 18 May 2019)
Log Message:
-----------
increase trie_size and triec_size

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

Modified: trunk/Build/source/texk/web2c/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/ChangeLog	2019-05-18 11:13:07 UTC (rev 51153)
+++ trunk/Build/source/texk/web2c/ChangeLog	2019-05-18 16:09:28 UTC (rev 51154)
@@ -1,3 +1,11 @@
+2019-05-18  Karl Berry  <karl at freefriends.org>
+
+	* patgen.ch (trie_size),
+	(triec_size): increase to maximum values 110021182 and 55000006
+	as reported by Keno Wehr,
+	(print_real calls): reorder parentheses to avoid overflow.
+	https://tug.org/pipermail/tex-live/2019-May/043679.html.
+
 2019-05-08  Akira Kakuto  <kakuto at w32tex.org>
 
 	* texmfmp.h: Define a new function find_input_file(integer s).

Modified: trunk/Build/source/texk/web2c/patgen.ch
===================================================================
--- trunk/Build/source/texk/web2c/patgen.ch	2019-05-18 11:13:07 UTC (rev 51153)
+++ trunk/Build/source/texk/web2c/patgen.ch	2019-05-18 16:09:28 UTC (rev 51154)
@@ -72,14 +72,14 @@
 @!text_char=ASCII_code; {the data type of characters in text files}
 @z
 
- at x Increase constants.
+ at x Maximum constant values from Keno Wehr, 17 May 2019 16:03:00 on tex-live.
 @!trie_size=55000; {space for pattern trie}
 @!triec_size=26000; {space for pattern count trie, must be less than
  |trie_size| and greater than the number of occurrences of any pattern in
  the dictionary}
 @y
-@!trie_size=10000000; {space for pattern trie}
-@!triec_size=5000000; {space for pattern count trie, must be less than
+@!trie_size=110021182; {max space for pattern trie}
+@!triec_size=54677566; {max space for pattern count trie, must be less than
  |trie_size| and greater than the number of occurrences of any pattern in
  the dictionary}
 @z
@@ -146,7 +146,7 @@
     filnam[7]:=xdig[hyph_level];
 @z
 
- at x Work around floating point I/O deficiency.
+ at x Work around floating point I/O deficiency; reorder to avoid overflow.
   if (good_count+miss_count)>0 then
     print_ln((100*good_count/(good_count+miss_count)):1:2,' %, ',
       (100*bad_count/(good_count+miss_count)):1:2,' %, ',
@@ -153,11 +153,11 @@
       (100*miss_count/(good_count+miss_count)):1:2,' %');
 @y
   if (good_count+miss_count)>0 then
-  begin print_real((100*good_count/(good_count+miss_count)),1,2);
+  begin print_real((100*(good_count/(good_count+miss_count))),1,2);
     print(' %, ');
-    print_real((100*bad_count/(good_count+miss_count)),1,2);
+    print_real((100*(bad_count/(good_count+miss_count))),1,2);
     print(' %, ');
-    print_real((100*miss_count/(good_count+miss_count)),1,2);
+    print_real((100*(miss_count/(good_count+miss_count))),1,2);
     print_ln(' %');
   end;
 @z



More information about the tex-live-commits mailing list