summaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorAndreas Scherer <andreas_tex@freenet.de>2022-01-15 13:16:19 +0000
committerAndreas Scherer <andreas_tex@freenet.de>2022-01-15 13:16:19 +0000
commit40ef95f4f7d57483bba18047e9c5f47e1dc7c158 (patch)
tree191f1d1e2342dd433d85cdcd6097dbfda95a097b /Build
parent97541c10a9f24782c05e28d98934f385c0534049 (diff)
[WEB] Adapt WEB to general conventions.
All C/WEB prograns but TANGLE used 'hash_size=8501'. In WEAVE, 'max_modules' is _not_ limited by '10240', but '4000' is more than enough anyway (and similarly used as 'max_sections' in CWEAVE). git-svn-id: svn://tug.org/texlive/trunk@61612 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build')
-rw-r--r--Build/source/texk/web2c/ChangeLog6
-rw-r--r--Build/source/texk/web2c/tangle.ch2
-rw-r--r--Build/source/texk/web2c/tangleboot.pin2
-rw-r--r--Build/source/texk/web2c/weave.ch2
4 files changed, 10 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/ChangeLog b/Build/source/texk/web2c/ChangeLog
index 34c94a10d44..f80e502556f 100644
--- a/Build/source/texk/web2c/ChangeLog
+++ b/Build/source/texk/web2c/ChangeLog
@@ -1,3 +1,9 @@
+2022-01-15 Andreas Scherer <https://ascherer.github.io>
+
+ * tangle.ch,
+ * tangleboot.pin,
+ * weave.ch: Adapt WEB to general conventions.
+
2022-01-12 Marcel Kr\"uger <tex@2krueger.de>
* showstream.ch: if (selector<no_print), rather than <log_only.
diff --git a/Build/source/texk/web2c/tangle.ch b/Build/source/texk/web2c/tangle.ch
index 2cc624136c2..b87fae1f50f 100644
--- a/Build/source/texk/web2c/tangle.ch
+++ b/Build/source/texk/web2c/tangle.ch
@@ -90,6 +90,7 @@ procedure initialize;
@!max_names=4000; {number of identifiers, strings, module names;
must be less than 10240}
@!max_texts=2000; {number of replacement texts, must be less than 10240}
+@!hash_size=353; {should be prime}
@y
@!max_bytes=65535; {|1/ww| times the number of bytes in identifiers,
strings, and module names; must be less than 65536}
@@ -98,6 +99,7 @@ procedure initialize;
@!max_names=10239; {number of identifiers, strings, module names;
must be less than 10240}
@!max_texts=10239; {number of replacement texts, must be less than 10240}
+@!hash_size=8501; {should be prime}
@z
@x
diff --git a/Build/source/texk/web2c/tangleboot.pin b/Build/source/texk/web2c/tangleboot.pin
index 36e7da9de93..29746a7a266 100644
--- a/Build/source/texk/web2c/tangleboot.pin
+++ b/Build/source/texk/web2c/tangleboot.pin
@@ -1,7 +1,7 @@
{2:}{4:}{$C-,A+,D-}{[$C+,D+]}
{:4}program TANGLE(webfile,changefile,Pascalfile,pool);
const{8:}bufsize=1000;maxbytes=65535;maxtoks=65535;maxnames=10239;
-maxtexts=10239;hashsize=353;longestname=400;linelength=72;
+maxtexts=10239;hashsize=8501;longestname=400;linelength=72;
outbufsize=144;stacksize=100;maxidlength=50;defunambiglength=32;
{:8}type{11:}ASCIIcode=0..255;
{:11}{12:}textfile=packed file of ASCIIcode;{:12}{37:}eightbits=0..255;
diff --git a/Build/source/texk/web2c/weave.ch b/Build/source/texk/web2c/weave.ch
index 8c11a9d9966..88916483f4c 100644
--- a/Build/source/texk/web2c/weave.ch
+++ b/Build/source/texk/web2c/weave.ch
@@ -111,7 +111,7 @@ procedure initialize;
@!long_buf_size=500; {|buf_size+longest_name|}
@!line_length=80; {lines of \TeX\ output have at most this many characters,
@y
-@!max_modules=10239; {greater than the total number of modules}
+@!max_modules=4000; {greater than the total number of modules}
@!hash_size=8501; {should be prime}
@!buf_size=1000; {maximum length of input line}
@!longest_name=10000; {module names shouldn't be longer than this}