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