diff options
-rw-r--r-- | Build/source/texk/web2c/cwebdir/ChangeLog | 13 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/comm-w2c.ch | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/comm-w2c.h | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/common.h | 2 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/ctang-w2c.ch | 6 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/ctangle.w | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/ctwill-hint.ch | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/ctwill-mini.ch | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/ctwill-w2c.ch | 6 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/cweav-w2c.ch | 6 | ||||
-rw-r--r-- | Build/source/texk/web2c/cwebdir/cweave.w | 12 |
11 files changed, 39 insertions, 26 deletions
diff --git a/Build/source/texk/web2c/cwebdir/ChangeLog b/Build/source/texk/web2c/cwebdir/ChangeLog index 586756acc43..9a83c7963fd 100644 --- a/Build/source/texk/web2c/cwebdir/ChangeLog +++ b/Build/source/texk/web2c/cwebdir/ChangeLog @@ -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, diff --git a/Build/source/texk/web2c/cwebdir/comm-w2c.ch b/Build/source/texk/web2c/cwebdir/comm-w2c.ch index 7b641abfee1..76721f57014 100644 --- a/Build/source/texk/web2c/cwebdir/comm-w2c.ch +++ b/Build/source/texk/web2c/cwebdir/comm-w2c.ch @@ -642,7 +642,7 @@ const char *use_language=""; /* prefix of \.{cwebmac.tex} in \TEX/ output */ char cb_banner[max_banner];@/ string texmf_locale;@/ #ifndef SEPARATORS -#define SEPARATORS "://" +#define SEPARATORS "://"@^system dependencies@> #endif char separators[]=SEPARATORS; @@ -819,7 +819,7 @@ Debugging output is always written to |stderr|, and begins with the string Modules for dealing with help messages and version info. -@<Include files@>= +@<Include files@>=@^system dependencies@> #define CWEB #include "help.h" /* |@!CTANGLEHELP|, |@!CWEAVEHELP|, |@!CTWILLHELP| */ diff --git a/Build/source/texk/web2c/cwebdir/comm-w2c.h b/Build/source/texk/web2c/cwebdir/comm-w2c.h index 1efbc92aa65..7c0d61c262e 100644 --- a/Build/source/texk/web2c/cwebdir/comm-w2c.h +++ b/Build/source/texk/web2c/cwebdir/comm-w2c.h @@ -30,7 +30,7 @@ First comes general stuff: @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 @@ are placed in the context of the `|_|'~macro. This is just a shortcut for the 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) diff --git a/Build/source/texk/web2c/cwebdir/common.h b/Build/source/texk/web2c/cwebdir/common.h index 15e1ea5d646..7637b8a6baf 100644 --- a/Build/source/texk/web2c/cwebdir/common.h +++ b/Build/source/texk/web2c/cwebdir/common.h @@ -32,7 +32,7 @@ First comes general stuff: @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; diff --git a/Build/source/texk/web2c/cwebdir/ctang-w2c.ch b/Build/source/texk/web2c/cwebdir/ctang-w2c.ch index 464a0a25a63..6c93873f760 100644 --- a/Build/source/texk/web2c/cwebdir/ctang-w2c.ch +++ b/Build/source/texk/web2c/cwebdir/ctang-w2c.ch @@ -383,7 +383,7 @@ case output_defs_code: if (t!=section_name) err_print(_("! Misplaced @@h")); @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 @@ case output_defs_code: if (t!=section_name) err_print(_("! Misplaced @@h")); 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 @@ do { } 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) diff --git a/Build/source/texk/web2c/cwebdir/ctangle.w b/Build/source/texk/web2c/cwebdir/ctangle.w index 304b704538e..98c1a40f598 100644 --- a/Build/source/texk/web2c/cwebdir/ctangle.w +++ b/Build/source/texk/web2c/cwebdir/ctangle.w @@ -336,7 +336,7 @@ boolean flag) /* |flag==false| means we are in |output_defs| */ 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 @@ but not an |int|, we use \.{\%td} to print these quantities. 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); diff --git a/Build/source/texk/web2c/cwebdir/ctwill-hint.ch b/Build/source/texk/web2c/cwebdir/ctwill-hint.ch index 0d7fe864eed..83227604d5f 100644 --- a/Build/source/texk/web2c/cwebdir/ctwill-hint.ch +++ b/Build/source/texk/web2c/cwebdir/ctwill-hint.ch @@ -780,7 +780,7 @@ Section 270. @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 @@ Section 270. @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"), diff --git a/Build/source/texk/web2c/cwebdir/ctwill-mini.ch b/Build/source/texk/web2c/cwebdir/ctwill-mini.ch index c5d05c7c021..4e7254c8140 100644 --- a/Build/source/texk/web2c/cwebdir/ctwill-mini.ch +++ b/Build/source/texk/web2c/cwebdir/ctwill-mini.ch @@ -1986,7 +1986,7 @@ Section 287. @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 @@ Section 287. @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"), diff --git a/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch b/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch index d093ae04136..dd37ff90491 100644 --- a/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch +++ b/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch @@ -1250,7 +1250,7 @@ out_name(cur_name,proofing); @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 @@ out_name(cur_name,proofing); @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 @@ do { } 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) diff --git a/Build/source/texk/web2c/cwebdir/cweav-w2c.ch b/Build/source/texk/web2c/cwebdir/cweav-w2c.ch index 231ad7a5d1d..28420a42309 100644 --- a/Build/source/texk/web2c/cwebdir/cweav-w2c.ch +++ b/Build/source/texk/web2c/cwebdir/cweav-w2c.ch @@ -574,7 +574,7 @@ if (check_for_change) @<Update the result when it has changed@>@; @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 @@ if (check_for_change) @<Update the result when it has changed@>@; @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 @@ do { } 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) diff --git a/Build/source/texk/web2c/cwebdir/cweave.w b/Build/source/texk/web2c/cwebdir/cweave.w index e8238e3056d..4391d95c397 100644 --- a/Build/source/texk/web2c/cwebdir/cweave.w +++ b/Build/source/texk/web2c/cwebdir/cweave.w @@ -241,7 +241,7 @@ to one-letter identifiers or \CEE/'s reserved words. 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 @@ text_pointer p) { 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 @@ text_pointer p) 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: -@d pop_level() cur_state = *(--stack_ptr) +@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 @@ else { 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 @@ needs to be changed if ASCII code is not being used. @^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 @@ void 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); |