texlive[61622] Build/source/texk/web2c: [WEB] Add third layer to

[commits+ascherer at tug.org]

Revision: 61622
          http://tug.org/svn/texlive?view=revision&revision=61622
Author:   ascherer
Date:     2022-01-16 11:19:50 +0100 (Sun, 16 Jan 2022)
Log Message:
-----------
[WEB] Add third layer to 'byte_mem'.

"pdftex.web + pdftex-final.ch" requires more than $2\times65336$ bytes
of memory when processed by WEAVE.

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

Modified: trunk/Build/source/texk/web2c/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/ChangeLog	2022-01-16 00:49:26 UTC (rev 61621)
+++ trunk/Build/source/texk/web2c/ChangeLog	2022-01-16 10:19:50 UTC (rev 61622)
@@ -1,3 +1,7 @@
+2022-01-16  Andreas Scherer  <https://ascherer.github.io>
+
+	* weave.ch: Add a third layer to 'byte_mem'.
+
 2022-01-15  Karl Berry  <karl at freefriends.org>
 
 	* web2c/Makefile.am (web2c_LDADD): set to libweb2c.a

Modified: trunk/Build/source/texk/web2c/weave.ch
===================================================================
--- trunk/Build/source/texk/web2c/weave.ch	2022-01-16 00:49:26 UTC (rev 61621)
+++ trunk/Build/source/texk/web2c/weave.ch	2022-01-16 10:19:50 UTC (rev 61622)
@@ -276,6 +276,28 @@
 end;
 @z
 
+ at x [37] extend 'byte_mem' for "pdftex.web + pdftex-final.ch"
+there are programs that need more than 65536 bytes; \TeX\ is one of these.
+ at y
+there are programs that need more than 65536 bytes; \TeX\ is one of these
+(and the pdf\TeX\ variant even requires more than twice that amount when
+its ``final'' change file is applied).
+ at z
+
+ at x
+is either 0 or 1. (For generality, the first index is actually allowed to
+run between 0 and |ww-1|, where |ww| is defined to be 2; the program will
+ at y
+is either 0, 1 or 2. (For generality, the first index is actually allowed to
+run between 0 and |ww-1|, where |ww| is defined to be 3; the program will
+ at z
+
+ at x
+ at d ww=2 {we multiply the byte capacity by approximately this amount}
+ at y
+ at d ww=3 {we multiply the byte capacity by approximately this amount}
+ at z
+
 @x [50] don't enter xrefs if no_xref set
 @d append_xref(#)==if xref_ptr=max_refs then overflow('cross reference')
   else  begin incr(xref_ptr); num(xref_ptr):=#;