texlive[67858] Build/source/texk/web2c/cwebdir/ctwill-w2c.ch:

[commits+ascherer at tug.org]

Revision: 67858
          http://tug.org/svn/texlive?view=revision&revision=67858
Author:   ascherer
Date:     2023-08-09 14:06:05 +0200 (Wed, 09 Aug 2023)
Log Message:
-----------
[CTWILL] Replace magic number.

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch

Modified: trunk/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch	2023-08-09 10:43:40 UTC (rev 67857)
+++ trunk/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch	2023-08-09 12:06:05 UTC (rev 67858)
@@ -1828,15 +1828,15 @@
 @ @c static void
 out_mini(
   meaning_struct *m)
-{ char s[90];
+{ char s[max_tex_chars+10];
   name_pointer cur_name=m->id;
   if (m->prog_no==0) { /* reference within current program */
     if (m->sec_no==section_count) return; /* defined in current section */
-    snprintf(s,90,"\\[%d",m->sec_no);
+    snprintf(s,max_tex_chars+10,"\\[%d",m->sec_no);
   } else { name_pointer n=title_code[m->prog_no];
     if (*(n->byte_start)=='{')
-      snprintf(s,90,"\\]%.*s%d",(int)length(n),n->byte_start,m->sec_no);
-    else snprintf(s,90,"\\]%.*s",(int)length(n),n->byte_start);
+      snprintf(s,max_tex_chars+10,"\\]%.*s%d",(int)length(n),n->byte_start,m->sec_no);
+    else snprintf(s,max_tex_chars+10,"\\]%.*s",(int)length(n),n->byte_start);
   }
   out_str(s); out(' ');
   @<Mini-output the name at |cur_name|@>@;