texlive[55660] Build/source/texk/web2c/cwebdir/ctwill-mini.ch:
commits+ascherer at tug.org
commits+ascherer at tug.org
Thu Jun 25 14:44:05 CEST 2020
Revision: 55660
http://tug.org/svn/texlive?view=revision&revision=55660
Author: ascherer
Date: 2020-06-25 14:44:05 +0200 (Thu, 25 Jun 2020)
Log Message:
-----------
[CTWILL] Roadmap to editorial changes.
Modified Paths:
--------------
trunk/Build/source/texk/web2c/cwebdir/ctwill-mini.ch
Modified: trunk/Build/source/texk/web2c/cwebdir/ctwill-mini.ch
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/ctwill-mini.ch 2020-06-25 12:06:28 UTC (rev 55659)
+++ trunk/Build/source/texk/web2c/cwebdir/ctwill-mini.ch 2020-06-25 12:44:05 UTC (rev 55660)
@@ -1,3 +1,5 @@
+Section 1.
+
@x
@** Introduction.
@y
@@ -36,6 +38,8 @@
@d banner "This is CTWILL, Version 3.64"
@z
+Section 3.
+
@x
@ Here is a sort of user manual for \.{CTWILL}---which is exactly like
@y
@@ -51,6 +55,8 @@
@-x@>
@z
+Section 4.
+
@x
The current meaning of every identifier is initially `\.{\\uninitialized}'.
@y
@@ -67,11 +73,15 @@
@ If the \TeX\ part starts
@z
+Section 5.
+
@x
@d max_tex_chars 50 /* limit on the \TeX\ part of a meaning */
@y
@z
+Section 7.
+
@x
you have to change them also in the file |"common.w"|.
@y
@@ -78,6 +88,8 @@
you have to change them also in file |"common.w"|.
@z
+Section 8.
+
@x
@ The next few sections contain stuff from the file |"common.w"| that must
@y
@@ -84,6 +96,8 @@
@r @ The next few sections contain stuff from the file |"common.w"| that must
@z
+Section 9.
+
@x
internationalization.
@y
@@ -93,6 +107,8 @@
@-STRING@>
@z
+Section 11.
+
@x
@ Code related to input routines:
@y
@@ -100,6 +116,8 @@
@-c@>
@z
+Section 12.
+
@x
@ Code related to identifier and section name storage:
@y
@@ -107,6 +125,8 @@
@-c@>
@z
+Section 13.
+
@x
@ Code related to error handling:
@y
@@ -114,6 +134,8 @@
@-s@>
@z
+Section 15.
+
@x
@ Code related to section numbers:
@y
@@ -120,6 +142,8 @@
@r @ Code related to section numbers:
@z
+Section 17.
+
@x
@ Code relating to output:
@y
@@ -129,6 +153,8 @@
@-c@>
@z
+Section 19.
+
@x
@* Data structures exclusive to {\tt CWEAVE}.
@y
@@ -136,6 +162,8 @@
@-a@>
@z
+Section 21.
+
@x
@ The other large memory area in \.{CWEAVE} keeps the cross-reference data.
@y
@@ -144,6 +172,8 @@
@-x@>
@z
+Section 23.
+
@x
@ \.{CTWILL} also has special data structures to keep track of current
@y
@@ -150,6 +180,8 @@
@r @ \.{CTWILL} also has special data structures to keep track of current
@z
+Section 28.
+
@x
@ The |new_meaning| routine changes the current ``permanent meaning''
@y
@@ -156,6 +188,8 @@
@r @ The |new_meaning| routine changes the current ``permanent meaning''
@z
+Section 31.
+
@x
@ A new cross-reference for an identifier is formed by calling |new_xref|,
@y
@@ -164,6 +198,8 @@
@-c@>
@z
+Section 39.
+
@x
id_lookup("do",NULL,do_like);
@y
@@ -171,6 +207,8 @@
id_lookup("do",NULL,do_like);
@z
+Section 40.
+
@x
id_lookup("undef",NULL,if_like);
@y
@@ -178,6 +216,8 @@
id_lookup("undef",NULL,if_like);
@z
+Section 44.
+
@x
@ Control codes are converted to \.{CWEAVE}'s internal
@y
@@ -184,6 +224,8 @@
@r @ Control codes are converted to \.{CWEAVE}'s internal
@z
+Section 50.
+
@x
\yskip\hang |xref_roman|, |xref_wildcard|, |xref_typewriter|, |TeX_string|,
|meaning|, |suppress|,
@@ -207,6 +249,8 @@
preceded by \.{@@(} instead of \.{@@<}.\par}
@z
+Section 52.
+
@x
@ As one might expect, |get_next| consists mostly of a big switch
@y
@@ -214,6 +258,8 @@
@-c@>
@z
+Section 59.
+
@x
@ The following code assigns values to the combinations \.{++},
@y
@@ -221,6 +267,8 @@
@-c@>
@z
+Section 62.
+
@x
@<Get a string@>= {
@y
@@ -227,6 +275,8 @@
@<Get a string@>= {@+
@z
+Section 66.
+
@x
@ @<Put section name...@>=
@y
@@ -233,13 +283,17 @@
@r @ @<Put section name...@>=
@z
+Section 80.
+
@x
with |next_control!='|'| and ends with |next_control>=format_code|. Thus, it
@y
-with |next_control| |{}!='|'| and ends with |next_control>=format_code|.
+with |next_control| |!='|'| and ends with |next_control>=format_code|.
Thus, it
@z
+Section 88.
+
@x
@ Finally, when the \TEX/ and definition parts have been treated, we have
|next_control>=begin_C|.
@@ -248,6 +302,8 @@
\hfil\break|next_control>=begin_C|.
@z
+Section 94.
+
@x
@ The |flush_buffer| routine empties the buffer up to a given breakpoint,
@y
@@ -255,6 +311,8 @@
@-c@>
@z
+Section 95.
+
@x
@ When we are copying \TEX/ source material, we retain line breaks
@y
@@ -261,6 +319,8 @@
@r @ When we are copying \TEX/ source material, we retain line breaks
@z
+Section 97.
+
@x
@ When we wish to append one character |c| to the output buffer, we write
@y
@@ -268,6 +328,8 @@
@-c@>
@z
+Section 101.
+
@x
@ We get to this section only in the unusual case that the entire output line
@y
@@ -274,6 +336,8 @@
@r @ We get to this section only in the unusual case that the entire output line
@z
+Section 105.
+
@x
static eight_bits
copy_TeX(void)
@@ -284,6 +348,8 @@
{@+
@z
+Section 106.
+
@x
@ The |copy_comment| function issues a warning if more braces are opened than
@y
@@ -291,6 +357,8 @@
@-t@>
@z
+Section 109.
+
@x
@ @<Copy special things when |c=='@@'...@>=
@y
@@ -297,6 +365,8 @@
@r @ @<Copy special things when |c=='@@'...@>=
@z
+Section 112.
+
@x
@ Here is a list of the category codes that scraps can have.
@y
@@ -303,6 +373,8 @@
@r @ Here is a list of the category codes that scraps can have.
@z
+Section 115.
+
@x
@ The token lists for translated \TEX/ output contain some special control
@y
@@ -310,19 +382,17 @@
@-n@>
@z
+Section 116.
+
@x
\yskip\noindent All of these tokens are removed from the \TEX/ output that
@y
@ All of these tokens are removed from the \TEX/ output that
- at z
-
- at x
-|n| is the section number.
- at y
-|n| is the section number.
@-n@>
@z
+Section 117.
+
@x
@ The raw input is converted into scraps according to the following table,
@y
@@ -339,6 +409,8 @@
\yskip\halign{\quad#\hfil&\quad\hbox to11cm{#\hfil}&\quad\hfil#\hfil\cr
@z
+Section 118.
+
@x
\.>&|prerangle|: \.{\\rangle}&yes\cr
@y
@@ -350,6 +422,8 @@
%\vskip\halign{\quad#\hfil&\quad\hbox to11cm{#\hfil}&\quad\hfil#\hfil\cr
@z
+Section 119.
+
@x
\.{continue}&|case_like|: \stars&maybe\cr
@y
@@ -361,6 +435,8 @@
%\vskip\halign{\quad#\hfil&\quad\hbox to11cm{#\hfil}&\quad\hfil#\hfil\cr
@z
+Section 120.
+
@x
\.{long}&|raw_int|: \stars&maybe\cr
@y
@@ -372,6 +448,8 @@
%\vskip\halign{\quad#\hfil&\quad\hbox to11cm{#\hfil}&\quad\hfil#\hfil\cr
@z
+Section 121.
+
@x
\.{try}&|else_like|: \stars&maybe\cr
@y
@@ -383,6 +461,8 @@
%\vskip\halign{\quad#\hfil&\quad\hbox to11cm{#\hfil}&\quad\hfil#\hfil\cr
@z
+Section 122--129.
+
@x
@i prod-twill.w
@y
@@ -394,6 +474,8 @@
@-z@>
@z
+Section 130.
+
@x
@* Implementing the productions.
@y
@@ -407,6 +489,8 @@
the category codes |pp->cat|, |(pp+1)->cat|, $\,\ldots\,$
@z
+Section 132.
+
@x
@ @<Set init...@>=
@y
@@ -413,6 +497,8 @@
@r @ @<Set init...@>=
@z
+Section 133.
+
@x
@ Token lists in |@!tok_mem| are composed of the following kinds of
@y
@@ -420,6 +506,8 @@
@-p@>
@z
+Section 134.
+
@x
#ifdef DEAD_CODE /* not used in |main| */
@y
@@ -430,6 +518,8 @@
#ifdef DEAD_CODE /* not used in |main| */
@z
+Section 135.
+
@x
@ @<Print token |r|...@>=
@y
@@ -436,6 +526,8 @@
@r @ @<Print token |r|...@>=
@z
+Section 136.
+
@x
@ The production rules listed above are embedded directly into \.{CWEAVE},
@y
@@ -449,6 +541,8 @@
@-pp@>
@z
+Section 137.
+
@x
The code below is an exact translation of the production rules into
@y
@@ -456,6 +550,8 @@
@-a@>
@z
+Section 139.
+
@x
@ Let us consider the big switch for productions now, before looking
@y
@@ -462,6 +558,8 @@
@r @ Let us consider the big switch for productions now, before looking
@z
+Section 140.
+
@x
switch (pp->cat) {
case exp: @<Cases for |exp|@>; @+break;
@@ -571,6 +669,8 @@
case question: @<Cases for |question|@>; @+break;
@z
+Section 141.
+
@x
of identifiers in case labels.
@@ -580,6 +680,8 @@
If the first identifier is the keyword `\&{operator}', we give up;
@z
+Section 142.
+
@x
@ The scraps currently being parsed must be inspected for any
@y
@@ -592,6 +694,8 @@
\hfil\break|make_reserved|, hence |tok_loc| has been set.
@z
+Section 147.
+
@x
{ token_pointer j;
@y
@@ -598,6 +702,8 @@
{@+ token_pointer j;
@z
+Section 148.
+
@x
@ The trickiest part of \.{CTWILL} is the procedure |make_ministring(l)|,
@y
@@ -613,6 +719,8 @@
{@+
@z
+Section 152.
+
@x
@ @<Cases for |lpar|@>=
@y
@@ -619,6 +727,8 @@
@r @ @<Cases for |lpar|@>=
@z
+Section 166.
+
@x
@ Outdent after parameter declarations with option \.{-i}.
@y
@@ -625,6 +735,8 @@
@r @ Outdent after parameter declarations with option \.{-i}.
@z
+Section 199.
+
@x
@ Here's the |squash| procedure, which
@y
@@ -631,6 +743,8 @@
@r @ Here's the |squash| procedure, which
@z
+Section 200.
+
@x
@ The following macro is used to append a scrap whose tokens have just
@y
@@ -639,6 +753,8 @@
@-c@>
@z
+Section 221.
+
@x
@ @d cur_end cur_state.end_field /* current ending location in |tok_mem| */
@y
@@ -645,6 +761,8 @@
@r @ @d cur_end cur_state.end_field /* current ending location in |tok_mem| */
@z
+Section 224.
+
@x
called when |stack_ptr==1|.
@y
@@ -651,6 +769,8 @@
called when |stack_ptr| |==1|.
@z
+Section 227.
+
@x
text_pointer save_text_ptr;
sixteen_bits save_next_control; /* values to be restored */
@@ -660,6 +780,8 @@
sixteen_bits save_next_control; /* values to be restored */
@z
+Section 230.
+
@x
@ An identifier of length one does not have to be enclosed in braces, and it
@y
@@ -666,6 +788,8 @@
@r @ An identifier of length one does not have to be enclosed in braces, and it
@z
+Section 231.
+
@x
else @<Look ahead for strongest line break, |goto reswitch|@>
@y
@@ -672,6 +796,8 @@
else {@<Look ahead for strongest line break, |goto reswitch|@>}
@z
+Section 232.
+
@x
@<Look ahead for st...@>= {
@y
@@ -683,6 +809,8 @@
@y
@z
+Section 233.
+
@x
@ @<Output saved...@>=
@y
@@ -689,6 +817,8 @@
@r @ @<Output saved...@>=
@z
+Section 243.
+
@x
@ The output file will contain the control sequence \.{\\Y} between non-null
@y
@@ -695,6 +825,8 @@
@r @ The output file will contain the control sequence \.{\\Y} between non-null
@z
+Section 246.
+
@x
@<Translate the \T...@>= do {
@y
@@ -701,6 +833,8 @@
@<Translate the \T...@>= do {@+
@z
+Section 254.
+
@x
|next_control>=begin_C|. We will make the global variable |this_section|
@y
@@ -707,6 +841,8 @@
\hfil\break|next_control>=begin_C|. We will make the global variable |this_section|
@z
+Section 255.
+
@x
@ @<Translate the \CEE/...@>=
@y
@@ -713,6 +849,8 @@
@r @ @<Translate the \CEE/...@>=
@z
+Section 259.
+
@x
@ The |footnote| procedure gives cross-reference information about
@y
@@ -719,6 +857,8 @@
@r @ The |footnote| procedure gives cross-reference information about
@z
+Section 263.
+
@x
@ @<Flag the usage of this identifier, for the mini-index@>=
@y
@@ -725,6 +865,8 @@
@<Flag the usage of this identifier, for the mini-index@>=
@z
+Section 264.
+
@x
@ @<Output information about usage of id's defined in other sections@>=
@y
@@ -731,6 +873,8 @@
@r @ @<Output information about usage of id's defined in other sections@>=
@z
+Section 270.
+
@x
the index section itself---NOT!
@@ -740,6 +884,8 @@
the index section itself---NOT!
@z
+Section 271.
+
@x
@ A left-to-right radix sorting method is used, since this makes it easy to
@y
@@ -754,6 +900,8 @@
sixteen_bits k_section; /* runs through the sections */
@z
+Section 273.
+
@x
@ During the sorting phase we shall use the |cat| and |trans| arrays from
@y
@@ -762,6 +910,8 @@
@-k@>
@z
+Section 276.
+
@x
$|collate|[0]<|collate|[1]<\cdots<|collate|[100]$.
@y
@@ -768,6 +918,8 @@
|collate[0]| $<$|collate[1]|$<\cdots<$|collate[100]|.
@z
+Section 283.
+
@x
else {char *j;
@y
@@ -774,6 +926,8 @@
else {@+char *j;
@z
+Section 290.
+
@x
@ Because on some systems the difference between two pointers is a |long|
@y
@@ -780,6 +934,8 @@
@r @ Because on some systems the difference between two pointers is a |long|
@z
+Section 291.
+
@x
\bigskip
\font\itt=cmitt10
@@ -789,6 +945,8 @@
@y
@z
+Section 293.
+
@x
@* Function declarations. Here are declarations---conforming to
@y
@@ -796,6 +954,8 @@
@-DEAD_CODE@>
@z
+Section 294.
+
@x
extern const char *use_language; /* prefix to \.{cwebmac.tex} in \TEX/ output */
@y
@@ -802,6 +962,8 @@
extern const char *use_language; /* prefix to \.{ctwimac.tex} in \TEX/ output */
@z
+Section 300.
+
@x
@** Index.
If you have read and understood the code for Phase III above, you know what
More information about the tex-live-commits
mailing list.