texlive[67846] Build/source/texk/web2c/cwebdir: [CWEB] Mark a few

commits+ascherer at tug.org commits+ascherer at tug.org
Tue Aug 8 17:24:40 CEST 2023


Revision: 67846
          http://tug.org/svn/texlive?view=revision&revision=67846
Author:   ascherer
Date:     2023-08-08 17:24:40 +0200 (Tue, 08 Aug 2023)
Log Message:
-----------
[CWEB] Mark a few 'system dependencies' for the index.

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/cwebdir/ChangeLog
    trunk/Build/source/texk/web2c/cwebdir/comm-w2c.ch
    trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h
    trunk/Build/source/texk/web2c/cwebdir/common.h
    trunk/Build/source/texk/web2c/cwebdir/ctang-w2c.ch
    trunk/Build/source/texk/web2c/cwebdir/ctangle.w
    trunk/Build/source/texk/web2c/cwebdir/ctwill-hint.ch
    trunk/Build/source/texk/web2c/cwebdir/ctwill-mini.ch
    trunk/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
    trunk/Build/source/texk/web2c/cwebdir/cweav-w2c.ch
    trunk/Build/source/texk/web2c/cwebdir/cweave.w

Modified: trunk/Build/source/texk/web2c/cwebdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ChangeLog	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/ChangeLog	2023-08-08 15:24:40 UTC (rev 67846)
@@ -1,3 +1,16 @@
+2023-08-08  Andreas Scherer  <https://ascherer.github.io>
+
+	* comm-w2c.ch,
+	* comm-w2c.h,
+	* common.h,
+	* ctang-w2c.ch,
+	* ctangle.w,
+	* ctwill-hint.ch,
+	* ctwill-mini.ch,
+	* ctwill-w2c.ch,
+	* cweav-w2c.ch,
+	* cweave.w: Mark a few 'system dependencies' for the index.
+
 2023-08-07  Andreas Scherer  <https://ascherer.github.io>
 
 	* common.c,

Modified: trunk/Build/source/texk/web2c/cwebdir/comm-w2c.ch
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/comm-w2c.ch	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/comm-w2c.ch	2023-08-08 15:24:40 UTC (rev 67846)
@@ -642,7 +642,7 @@
 char cb_banner[max_banner];@/
 string texmf_locale;@/
 #ifndef SEPARATORS
-#define SEPARATORS "://"
+#define SEPARATORS "://"@^system dependencies@>
 #endif
 char separators[]=SEPARATORS;
 
@@ -819,7 +819,7 @@
 
 Modules for dealing with help messages and version info.
 
-@<Include files@>=
+@<Include files@>=@^system dependencies@>
 #define CWEB
 #include "help.h" /* |@!CTANGLEHELP|, |@!CWEAVEHELP|, |@!CTWILLHELP| */
 

Modified: trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h	2023-08-08 15:24:40 UTC (rev 67846)
@@ -30,7 +30,7 @@
 @i iso_types.w
 
 @s boolean bool
-@<Common code...@>=
+@<Common code...@>=@^system dependencies@>
 typedef uint8_t eight_bits;
 typedef uint16_t sixteen_bits;
 typedef enum {
@@ -52,7 +52,7 @@
 not have this library installed, we wrap things for neutral behavior without
 internationalization.
 For backward compatibility with pre-{\mc ANSI} compilers, we replace the
-``standard'' header file `\.{stdbool.h}' with the
+``standard'' header file `\.{stdbool.h}' with the@^system dependencies@>
 {\mc KPATHSEA\spacefactor1000} interface `\.{simpletypes.h}'.
 
 @d _(s) gettext(s)

Modified: trunk/Build/source/texk/web2c/cwebdir/common.h
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/common.h	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/common.h	2023-08-08 15:24:40 UTC (rev 67846)
@@ -32,7 +32,7 @@
 @d ctangle false
 @d cweave true
 
-@<Common code...@>=
+@<Common code...@>=@^system dependencies@>
 typedef bool boolean;
 typedef uint8_t eight_bits;
 typedef uint16_t sixteen_bits;

Modified: trunk/Build/source/texk/web2c/cwebdir/ctang-w2c.ch
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ctang-w2c.ch	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/ctang-w2c.ch	2023-08-08 15:24:40 UTC (rev 67846)
@@ -383,7 +383,7 @@
 
 @x
   puts("\nMemory usage statistics:");
-  printf("%td names (out of %ld)\n",
+  printf("%td names (out of %ld)\n",@^system dependencies@>
           (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf("%td replacement texts (out of %ld)\n",
           (ptrdiff_t)(text_ptr-text_info),(long)max_texts);
@@ -392,7 +392,7 @@
   printf("%td tokens (out of %ld)\n",
 @y
   puts(_("\nMemory usage statistics:"));
-  printf(_("%td names (out of %ld)\n"),
+  printf(_("%td names (out of %ld)\n"),@^system dependencies@>
           (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf(_("%td replacement texts (out of %ld)\n"),
           (ptrdiff_t)(text_ptr-text_info),(long)max_texts);
@@ -459,7 +459,7 @@
 } while(comparison && !feof(C_file) && !feof(check_file));
 
 @ Note the superfluous call to |remove| before |rename|.  We're using it to
-get around a bug in some implementations of |rename|.
+get around a bug in some implementations of |rename|.@^system dependencies@>
 
 @<Create the primary output...@>=
 if(comparison)

Modified: trunk/Build/source/texk/web2c/cwebdir/ctangle.w
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ctangle.w	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/ctangle.w	2023-08-08 15:24:40 UTC (rev 67846)
@@ -336,7 +336,7 @@
     cur_byte=cur_repl->tok_start; return;
   }
   stack_ptr--; /* go down to the previous level */
-  if (stack_ptr>stack) cur_state=*stack_ptr;
+  if (stack_ptr>stack) cur_state=*stack_ptr;@^system dependencies@>
 }
 
 @ The heart of the output procedure is the function |get_output|,
@@ -1534,7 +1534,7 @@
 void
 print_stats(void) {
   puts("\nMemory usage statistics:");
-  printf("%td names (out of %ld)\n",
+  printf("%td names (out of %ld)\n",@^system dependencies@>
           (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf("%td replacement texts (out of %ld)\n",
           (ptrdiff_t)(text_ptr-text_info),(long)max_texts);

Modified: trunk/Build/source/texk/web2c/cwebdir/ctwill-hint.ch
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ctwill-hint.ch	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/ctwill-hint.ch	2023-08-08 15:24:40 UTC (rev 67846)
@@ -780,7 +780,7 @@
 @x
   puts(_("\nMemory usage statistics:"));
 @.Memory usage statistics:@>
-  printf(_("%td names (out of %ld)\n"),
+  printf(_("%td names (out of %ld)\n"),@^system dependencies@>
             (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf(_("%td cross-references (out of %ld)\n"),
             (ptrdiff_t)(xref_ptr-xmem),(long)max_refs);
@@ -806,7 +806,7 @@
 @y
   puts(_("\nMemory usage statistics:"));@/
 @.Memory usage statistics:@>
-  printf(_("%td names (out of %ld)\n"),
+  printf(_("%td names (out of %ld)\n"),@^system dependencies@>
             (ptrdiff_t)(name_ptr-name_dir),@/
             @t\5\5\5\5@>(long)max_names);@/
   printf(_("%td cross-references (out of %ld)\n"),

Modified: trunk/Build/source/texk/web2c/cwebdir/ctwill-mini.ch
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ctwill-mini.ch	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/ctwill-mini.ch	2023-08-08 15:24:40 UTC (rev 67846)
@@ -1986,7 +1986,7 @@
 @x
   puts(_("\nMemory usage statistics:"));
 @.Memory usage statistics:@>
-  printf(_("%td names (out of %ld)\n"),
+  printf(_("%td names (out of %ld)\n"),@^system dependencies@>
             (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf(_("%td cross-references (out of %ld)\n"),
             (ptrdiff_t)(xref_ptr-xmem),(long)max_refs);
@@ -2012,7 +2012,7 @@
 @y
   puts(_("\nMemory usage statistics:"));@/
 @.Memory usage statistics:@>
-  printf(_("%td names (out of %ld)\n"),
+  printf(_("%td names (out of %ld)\n"),@^system dependencies@>
             (ptrdiff_t)(name_ptr-name_dir),@/
             @t\5\5\5\5@>(long)max_names);@/
   printf(_("%td cross-references (out of %ld)\n"),

Modified: trunk/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch	2023-08-08 15:24:40 UTC (rev 67846)
@@ -1250,7 +1250,7 @@
 @x
   puts("\nMemory usage statistics:");
 @.Memory usage statistics:@>
-  printf("%td names (out of %ld)\n",
+  printf("%td names (out of %ld)\n",@^system dependencies@>
             (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf("%td cross-references (out of %ld)\n",
             (ptrdiff_t)(xref_ptr-xmem),(long)max_refs);
@@ -1271,7 +1271,7 @@
 @y
   puts(_("\nMemory usage statistics:"));
 @.Memory usage statistics:@>
-  printf(_("%td names (out of %ld)\n"),
+  printf(_("%td names (out of %ld)\n"),@^system dependencies@>
             (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf(_("%td cross-references (out of %ld)\n"),
             (ptrdiff_t)(xref_ptr-xmem),(long)max_refs);
@@ -1989,7 +1989,7 @@
 } while(comparison && !feof(tex_file) && !feof(check_file));
 
 @ Note the superfluous call to |remove| before |rename|.  We're using it to
-get around a bug in some implementations of |rename|.
+get around a bug in some implementations of |rename|.@^system dependencies@>
 
 @<Take appropriate action...@>=
 if(comparison)

Modified: trunk/Build/source/texk/web2c/cwebdir/cweav-w2c.ch
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/cweav-w2c.ch	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/cweav-w2c.ch	2023-08-08 15:24:40 UTC (rev 67846)
@@ -574,7 +574,7 @@
 @x
   puts("\nMemory usage statistics:");
 @.Memory usage statistics:@>
-  printf("%td names (out of %ld)\n",
+  printf("%td names (out of %ld)\n",@^system dependencies@>
             (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf("%td cross-references (out of %ld)\n",
             (ptrdiff_t)(xref_ptr-xmem),(long)max_refs);
@@ -595,7 +595,7 @@
 @y
   puts(_("\nMemory usage statistics:"));
 @.Memory usage statistics:@>
-  printf(_("%td names (out of %ld)\n"),
+  printf(_("%td names (out of %ld)\n"),@^system dependencies@>
             (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf(_("%td cross-references (out of %ld)\n"),
             (ptrdiff_t)(xref_ptr-xmem),(long)max_refs);
@@ -685,7 +685,7 @@
 } while(comparison && !feof(tex_file) && !feof(check_file));
 
 @ Note the superfluous call to |remove| before |rename|.  We're using it to
-get around a bug in some implementations of |rename|.
+get around a bug in some implementations of |rename|.@^system dependencies@>
 
 @<Take appropriate action...@>=
 if(comparison)

Modified: trunk/Build/source/texk/web2c/cwebdir/cweave.w
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/cweave.w	2023-08-08 10:27:42 UTC (rev 67845)
+++ trunk/Build/source/texk/web2c/cwebdir/cweave.w	2023-08-08 15:24:40 UTC (rev 67846)
@@ -241,7 +241,7 @@
 If the user has sent the |no_xref| flag (the \.{-x} option of the command line),
 it is unnecessary to keep track of cross-references for identifiers.
 If one were careful, one could probably make more changes around section
-115 to avoid a lot of identifier looking up.
+|@<Match a prod...@>| to avoid a lot of identifier looking up.
 
 @d append_xref(c) if (xref_ptr==xmem_end) overflow("cross-reference");
   else (++xref_ptr)->num=c
@@ -3810,7 +3810,7 @@
 {
   if (stack_ptr==stack_end) overflow("stack");
   if (stack_ptr>stack) /* save current state */
-    *stack_ptr = cur_state;
+    *stack_ptr = cur_state;@^system dependencies@>
   stack_ptr++;
   if (stack_ptr>max_stack_ptr) max_stack_ptr=stack_ptr;
   cur_tok=*p; cur_end=*(p+1);
@@ -3820,7 +3820,7 @@
 force when the current level was begun. This subroutine will never be
 called when |stack_ptr==1|. It is so simple, we declare it as a macro:
 
- at d pop_level() cur_state = *(--stack_ptr)
+ at d pop_level() cur_state = *(--stack_ptr)@^system dependencies@>
 
 @ The |get_output| function returns the next byte of output that is not a
 reference to a token list. It returns the values |identifier| or |res_word|
@@ -4242,7 +4242,7 @@
     loc++;
   }
   else {
-    for (sec_depth=0; xisdigit(*loc);loc++)
+    for (sec_depth=0; xisdigit(*loc);loc++)@^system dependencies@>
       if (sec_depth < INT_MAX / 10) sec_depth = sec_depth*10 + (*loc) -'0';
   }
   while (*loc == ' ') loc++; /* remove spaces before group title */
@@ -4666,7 +4666,7 @@
 @^high-bit character handling@>
 
 We initialize |collate| by copying a few characters at a time, because
-some \CEE/ compilers choke on long strings.
+some \CEE/ compilers choke on long strings.@^system dependencies@>
 
 @<Set init...@>=
 collate[0]=0;
@@ -4864,7 +4864,7 @@
 print_stats(void) {
   puts("\nMemory usage statistics:");
 @.Memory usage statistics:@>
-  printf("%td names (out of %ld)\n",
+  printf("%td names (out of %ld)\n",@^system dependencies@>
             (ptrdiff_t)(name_ptr-name_dir),(long)max_names);
   printf("%td cross-references (out of %ld)\n",
             (ptrdiff_t)(xref_ptr-xmem),(long)max_refs);



More information about the tex-live-commits mailing list.