texlive[72207] Build/source/texk/web2c: [TWILL] Sort section names.

commits+ascherer at tug.org commits+ascherer at tug.org
Fri Sep 6 17:03:58 CEST 2024


Revision: 72207
          https://tug.org/svn/texlive?view=revision&revision=72207
Author:   ascherer
Date:     2024-09-06 17:03:58 +0200 (Fri, 06 Sep 2024)
Log Message:
-----------
[TWILL] Sort section names.

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/ChangeLog
    trunk/Build/source/texk/web2c/weav-twill.ch
    trunk/Build/source/texk/web2c/weave.ch

Modified: trunk/Build/source/texk/web2c/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/ChangeLog	2024-09-05 23:41:55 UTC (rev 72206)
+++ trunk/Build/source/texk/web2c/ChangeLog	2024-09-06 15:03:58 UTC (rev 72207)
@@ -1,3 +1,8 @@
+2024-09-06  Andreas Scherer  <https://ascherer.github.io>
+
+	* weav-twill.ch,
+	* weave.ch: Sort section names in TWILL.
+
 2024-09-02  Andreas Scherer  <https://ascherer.github.io>
 
 	* bibtex.ch,

Modified: trunk/Build/source/texk/web2c/weav-twill.ch
===================================================================
--- trunk/Build/source/texk/web2c/weav-twill.ch	2024-09-05 23:41:55 UTC (rev 72206)
+++ trunk/Build/source/texk/web2c/weav-twill.ch	2024-09-06 15:03:58 UTC (rev 72207)
@@ -251,6 +251,22 @@
 @y
 @z
 
+Section 75.
+
+ at x 1323
+@<Move |buffer| and |limit| to |change_buffer| and |change_limit|@>;
+ at y
+@<Move \(|buffer| and |limit| to |change_buffer| and |change_limit|@>;
+ at z
+
+Section 78.
+
+ at x 1357
+@ @<Move |buffer| and |limit| to |change_buffer| and |change_limit|@>=
+ at y
+@ @<Move \(|buffer| and |limit| to |change_buffer| and |change_limit|@>=
+ at z
+
 Section 79.
 
 @x 1371,1383d1401
@@ -279,6 +295,12 @@
 @y
 @z
 
+ at x 1405
+  @<Move |buffer| and |limit|...@>;
+ at y
+  @<Move \(|buffer| and |limit|...@>;
+ at z
+
 Section 82.
 
 @x 1450,1454c1463,1469

Modified: trunk/Build/source/texk/web2c/weave.ch
===================================================================
--- trunk/Build/source/texk/web2c/weave.ch	2024-09-05 23:41:55 UTC (rev 72206)
+++ trunk/Build/source/texk/web2c/weave.ch	2024-09-06 15:03:58 UTC (rev 72207)
@@ -159,7 +159,6 @@
 @d term_out==stdout
 @d print(#)==write(term_out,#) {`|print|' means write on the terminal}
 @z
-
 @x [3.20] l.521
 @<Globals...@>=
 @!term_out:text_file; {the terminal as an output file}
@@ -282,7 +281,6 @@
 (and the pdf\TeX\ variant even requires more than twice that amount when
 its ``final'' change file is applied).
 @z
-
 @x [5.37] l.729
 is either 0 or 1. (For generality, the first index is actually allowed to
 run between 0 and |ww-1|, where |ww| is defined to be 2; the program will
@@ -290,7 +288,6 @@
 is either 0, 1 or 2. (For generality, the first index is actually allowed to
 run between 0 and |ww-1|, where |ww| is defined to be 3; the program will
 @z
-
 @x [5.37] l.734
 @d ww=2 {we multiply the byte capacity by approximately this amount}
 @y
@@ -340,7 +337,6 @@
 @.\\input pwebmac@>
 @.pwebmac@>
 @z
-
 @x [12.124] l.2204
 out_ptr:=1; out_line:=1; out_buf[1]:="c"; write(tex_file,'\input webma');
 @y
@@ -356,7 +352,6 @@
 preceded by another backslash or a \TeX\ comment marker. In the latter case, a
 |'%'| is output at the break.
 @z
-
 @x [12.127] l.2248 - deal with malign user input
   if (d="\")and(out_buf[k-1]<>"\") then {in this case |k>1|}
 @y
@@ -411,7 +406,6 @@
 @y
 if cat[pp+1]=close then reduce(pp,0,stmt,-2)(43)
 @z
-
 @x [15.167] l.3277 - Apply 'squash(...,2,...)'.
   begin app(force); app(backup); app2(pp); reduce(pp,2,intro,-3)(44);
 @y
@@ -436,7 +430,6 @@
 scrap list.  This procedure takes advantage of the simplification that
 occurs when |k=0|.
 @z
-
 @x [15.172] l.3330
 begin cat[j]:=c; trans[j]:=text_ptr; freeze_text;
 @y
@@ -446,7 +439,6 @@
     trans[j]:=text_ptr; freeze_text;
   end;
 @z
-
 @x [15.172] l.3337 - Fix spacing.
 @<Change |pp| to $\max(|scrap_base|,|pp+d|)$@>;
 @y
@@ -466,7 +458,6 @@
 @ Similarly, the `|squash|' macro invokes a procedure called `|sq|', which
 combines |app|${}_k$ and |red| for matching numbers~|k|.
 @z
-
 @x [15.174] l.3349
 var i:0..max_scraps; {index into scrap memory}
 begin if k=1 then
@@ -488,6 +479,56 @@
   red(j,k,c,d);
 @z
 
+ at x [16.185] l.3555
+string,verbatim: @<Append a \(string scrap@>;
+identifier: @<Append an identifier scrap@>;
+TeX_string: @<Append a \TeX\ string scrap@>;
+ at y
+string,verbatim: @<Append \(a \(string scrap@>;
+identifier: @<Append \(an identifier scrap@>;
+TeX_string: @<Append \(a \TeX\ string scrap@>;
+ at z
+
+ at x [16.189] l.3652
+@<Append a \(string scrap@>=
+ at y
+@<Append \(a \(string scrap@>=
+ at z
+
+ at x [16.190] l.3690
+@ @<Append a \TeX\ string scrap@>=
+ at y
+@ @<Append \(a \TeX\ string scrap@>=
+ at z
+
+ at x [16.191] l.3697
+@ @<Append an identifier scrap@>=
+ at y
+@ @<Append \(an identifier scrap@>=
+ at z
+
+ at x [16.193] l.3731
+else_like: begin @<Append |terminator| if not already present@>;
+ at y
+else_like: begin @<Append \(|terminator| if not already present@>;
+ at z
+ at x [16.193] l.3734
+end_like: begin @<Append |term...@>;
+ at y
+end_like: begin @<Append \(|term...@>;
+ at z
+ at x [16.193] l.3752
+until_like: begin @<Append |term...@>;
+ at y
+until_like: begin @<Append \(|term...@>;
+ at z
+
+ at x [16.194] l.3762
+@<Append |termin...@>=
+ at y
+@<Append \(|termin...@>=
+ at z
+
 @x [19.239] l.4537 - omit index and module names if no_xref set
 @<Phase III: Output the cross-reference index@>=
 @y
@@ -504,7 +545,6 @@
         end
 else begin
 @z
-
 @x [19.239] l.4551
 print('Done.');
 @y
@@ -519,7 +559,6 @@
 
 @d term_in==stdin
 @z
-
 @x [20.258] l.4790
 @!term_in:text_file; {the user's terminal as an input file}
 @y
@@ -536,7 +575,6 @@
 print (banner); {print a ``banner line''}
 print_ln (version_string);
 @z
-
 @x [21.261] l.4856
 end_of_WEAVE:
 stat @<Print statistics about memory usage@>;@+tats@;@/



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