texlive[67760] Build/source/texk/web2c: [CWEB] Ilk is of type

[commits+ascherer at tug.org]

Revision: 67760
          http://tug.org/svn/texlive?view=revision&revision=67760
Author:   ascherer
Date:     2023-07-29 11:28:43 +0200 (Sat, 29 Jul 2023)
Log Message:
-----------
[CWEB] Ilk is of type eight_bis.

See signatures of id_lookup and names_match.

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/ctangleboot.cin
    trunk/Build/source/texk/web2c/cwebboot.cin
    trunk/Build/source/texk/web2c/cwebdir/ChangeLog
    trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h
    trunk/Build/source/texk/web2c/cwebdir/common.c
    trunk/Build/source/texk/web2c/cwebdir/common.h
    trunk/Build/source/texk/web2c/cwebdir/ctangle.c

Modified: trunk/Build/source/texk/web2c/ctangleboot.cin
===================================================================
--- trunk/Build/source/texk/web2c/ctangleboot.cin	2023-07-28 23:43:43 UTC (rev 67759)
+++ trunk/Build/source/texk/web2c/ctangleboot.cin	2023-07-29 09:28:43 UTC (rev 67760)
@@ -237,7 +237,7 @@
 union{
 struct name_info*Rlink;
 
-char Ilk;
+eight_bits Ilk;
 }dummy;
 void*equiv_or_xref;
 }name_info;

Modified: trunk/Build/source/texk/web2c/cwebboot.cin
===================================================================
--- trunk/Build/source/texk/web2c/cwebboot.cin	2023-07-28 23:43:43 UTC (rev 67759)
+++ trunk/Build/source/texk/web2c/cwebboot.cin	2023-07-29 09:28:43 UTC (rev 67760)
@@ -239,7 +239,7 @@
 union{
 struct name_info*Rlink;
 
-char Ilk;
+eight_bits Ilk;
 }dummy;
 void*equiv_or_xref;
 }name_info;

Modified: trunk/Build/source/texk/web2c/cwebdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ChangeLog	2023-07-28 23:43:43 UTC (rev 67759)
+++ trunk/Build/source/texk/web2c/cwebdir/ChangeLog	2023-07-29 09:28:43 UTC (rev 67760)
@@ -1,5 +1,12 @@
 2023-07-28  Andreas Scherer  <https://ascherer.github.io>
 
+	* comm-w2c.h,
+	* common.c,
+	* common.h,
+	* ctangle.c: Ilk is of type eight_bits.
+
+2023-07-28  Andreas Scherer  <https://ascherer.github.io>
+
 	* comm-mini.ch,
 	* comm-w2c.ch,
 	* common.bux,

Modified: trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h	2023-07-28 23:43:43 UTC (rev 67759)
+++ trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h	2023-07-29 09:28:43 UTC (rev 67760)
@@ -175,7 +175,7 @@
   union {
     struct name_info *Rlink; /* right link in binary search tree for section
       names */
-    char Ilk; /* used by identifiers in \.{CWEAVE} only */
+    eight_bits Ilk; /* used by identifiers in \.{CWEAVE} only */
   } dummy;
   void *equiv_or_xref; /* info corresponding to names */
 } name_info; /* contains information about an identifier or section name */

Modified: trunk/Build/source/texk/web2c/cwebdir/common.c
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/common.c	2023-07-28 23:43:43 UTC (rev 67759)
+++ trunk/Build/source/texk/web2c/cwebdir/common.c	2023-07-29 09:28:43 UTC (rev 67760)
@@ -183,7 +183,7 @@
 union{
 struct name_info*Rlink;
 
-char Ilk;
+eight_bits Ilk;
 }dummy;
 void*equiv_or_xref;
 }name_info;

Modified: trunk/Build/source/texk/web2c/cwebdir/common.h
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/common.h	2023-07-28 23:43:43 UTC (rev 67759)
+++ trunk/Build/source/texk/web2c/cwebdir/common.h	2023-07-29 09:28:43 UTC (rev 67760)
@@ -153,7 +153,7 @@
   union {
     struct name_info *Rlink; /* right link in binary search tree for section
       names */
-    char Ilk; /* used by identifiers in \.{CWEAVE} only */
+    eight_bits Ilk; /* used by identifiers in \.{CWEAVE} only */
   } dummy;
   void *equiv_or_xref; /* info corresponding to names */
 } name_info; /* contains information about an identifier or section name */

Modified: trunk/Build/source/texk/web2c/cwebdir/ctangle.c
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ctangle.c	2023-07-28 23:43:43 UTC (rev 67759)
+++ trunk/Build/source/texk/web2c/cwebdir/ctangle.c	2023-07-29 09:28:43 UTC (rev 67760)
@@ -15,7 +15,7 @@
 /*:5*/
 #line 67 "ctangle.w"
 
-#define banner "This is CTANGLE (Version 4.9win32)" \
+#define banner "This is CTANGLE (Version 4.9)" \
 
 #define ctangle false
 #define cweave true \
@@ -216,7 +216,7 @@
 union{
 struct name_info*Rlink;
 
-char Ilk;
+eight_bits Ilk;
 }dummy;
 void*equiv_or_xref;
 }name_info;
@@ -527,13 +527,11 @@
 /*:2*//*24:*/
 #line 155 "ctangle.w"
 
-#line 19 "ctang-w32.ch"
-boolean __cdecl names_match(
+boolean names_match(
 name_pointer p,
 const char*first,
 size_t l,
 eight_bits t)
-#line 161 "ctangle.w"
 {(void)t;
 return length(p)==l&&strncmp(first,p->byte_start,l)==0;
 }
@@ -541,7 +539,6 @@
 /*:24*//*25:*/
 #line 168 "ctangle.w"
 
-#line 34 "ctang-w32.ch"
 void
 init_node(
 name_pointer node)
@@ -548,7 +545,6 @@
 {
 node->equiv= (void*)text_info;
 }
-#line 175 "ctangle.w"
 
 /*:25*//*29:*/
 #line 232 "ctangle.w"