[CTWILL] Avoid several 'Overfull \vbox'es.

git-svn-id: svn://tug.org/texlive/trunk/Build/source@73694 c570f23f-e606-0410-a88d-b1316a301751

texk/web2c/cwebdir/ChangeLog

@@ -1,3 +1,7 @@
+2025-02-02  Andreas Scherer  <https://ascherer.github.io>
+
+	* ctwill-mini.ch: Avoid several 'Overfull \vbox'es.
+
 2025-01-29  Andreas Scherer  <https://ascherer.github.io>
 
 	* tests/ham.ch: Add line information.

texk/web2c/cwebdir/ctwill-mini.ch

@@ -265,6 +265,14 @@ Section 25.
 @$no_xref {CTWILL}25 =$\R\\{make\_xrefs}$@>
 @z
 
+Section 27.
+
+@x
+        while (q->num>section_xref_switch) {r=q; q=q->xlink;}
+@y
+        while (q->num>section_xref_switch) {@+r=q; q=q->xlink;@+}
+@z
+
 Section 36.
 
 @x
@@ -519,6 +527,18 @@ Section 80.
 \hfil\break|next_control>=begin_C|.
 @z
 
+Section 82.
+
+@x
+  if (p) {
+@y
+  @+ if (!p) return;
+@z
+@x
+  }
+@y
+@z
+
 Section 86.
 
 @x
@@ -1313,11 +1333,23 @@ scrap_pointer p)
 
 Section 141.
 
+@x
+  xref_pointer q=(xref_pointer)p->xref; /* pointer to cross-reference being examined */
+@y
+  @+ xref_pointer q=(xref_pointer)p->xref; /* pointer to cross-reference being examined */
+@z
 @x
   while (q != xmem) {
 @y
   while (q != xmem) { @+
 @z
+@x
+    else if (m==n+def_flag) {
+        q->num=m; return;
+@y
+    else if (m==n+def_flag) { @+
+        q->num=m; return; @+
+@z
 
 Section 143.
 
@@ -1416,6 +1448,31 @@ Section 197.
 @y
 @r @ Now here's the |reduce| procedure used in our code for productions,
 @z
+@x
+  scrap_pointer i; /* pointer into scrap memory */
+@y
+  @+ scrap_pointer i; /* pointer into scrap memory */
+@z
+@x
+  pp--; /* we next say |pp++| */
+@y
+@z
+
+Section 198.
+
+@x
+  switch (k) {
+@y
+  @+ switch (k) {
+@z
+
+Section 199.
+
+@x
+static int tracing=off; /* can be used to show parsing details */
+@y
+@+ static int tracing=off; /* used to show parsing details */
+@z
 
 Section 200.
 
@@ -1427,6 +1484,12 @@ Section 200.
 @%
 @$n {CTWILL}197 \&{short}@>
 @z
+@x
+}
+@y
+}
+pp--; /* we next say |pp++| */
+@z
 
 Section 202.