Skip to content

Commit

Permalink
Merge branch 'texlive-trunk' r68616
Browse files Browse the repository at this point in the history
  • Loading branch information
t-tk committed Oct 22, 2023
2 parents c2aa815 + 395bdf2 commit 306fa68
Show file tree
Hide file tree
Showing 14 changed files with 61 additions and 42 deletions.
4 changes: 2 additions & 2 deletions source/libs/README
Original file line number Diff line number Diff line change
Expand Up @@ -25,8 +25,8 @@ graphite2 1.3.14 - checked 10apr20
http://sourceforge.net/projects/silgraphite/files/graphite2/
(requires C++11)

harfbuzz 8.2.1 - checked 19sep23
https://github.com/harfbuzz/harfbuzz/releases/tag/8.2.1
harfbuzz 8.2.2 - checked 18oct23
https://github.com/harfbuzz/harfbuzz/releases/tag/8.2.2

icu 72.1 - checked 07jan23
https://github.com/unicode-org/icu/releases/
Expand Down
2 changes: 1 addition & 1 deletion source/texk/texlive/windows_wrapper/runscript.tlu
Original file line number Diff line number Diff line change
Expand Up @@ -555,7 +555,7 @@ end
-- program name

-- lower arg[0] : get file name part : remove extension
local progname, substcount = string.lower(arg[0]):gsub('^.*[\\/]', ''):gsub('%.[^.]*$', '')
local progname, substcount = string.lower(arg[0]):gsub('^.*[\\/]', ''):gsub('%.exe$', '')
-- special behaviour when called under 'runscript' name
if (progname == 'runscript') then
-- we are called as: runscript progname ...
Expand Down
7 changes: 7 additions & 0 deletions source/texk/web2c/ChangeLog
Original file line number Diff line number Diff line change
@@ -1,3 +1,10 @@
2023-10-21 Andreas Scherer <https://ascherer.github.io>

* tangleboot.pin,
* tangle.ch,
* weav-twill.ch,
* weave.ch: 'current_option' runs from '0..n_options'.

2023-10-13 Andreas Scherer <https://ascherer.github.io>

* help.h,
Expand Down
5 changes: 5 additions & 0 deletions source/texk/web2c/cwebdir/ChangeLog
Original file line number Diff line number Diff line change
@@ -1,3 +1,8 @@
2023-10-18 Andreas Scherer <https://ascherer.github.io>

* cwebmac.tex,
* cwebman-w2c.ch: Minor redactions in the CWEB manual and macros.

2023-10-15 Andreas Scherer <https://ascherer.github.io>

* cwebman-w2c.ch: Fix display in Skim and Acrobat Reader on macOS.
Expand Down
16 changes: 8 additions & 8 deletions source/texk/web2c/cwebdir/cwebacromac.tex
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
% hypertext macros for CWEB listings (in addition to cwebmac.tex)
% Version 1.1 --- September 2023
\ifx\acrohint\undefined\else\endinput\fi % these are not standalone macros
\ifx\ifacrohint\undefined\endinput\fi % these are not standalone macros
\ifluatex % LuaTeX is almost like pdfTeX
\protected\def\pdfliteral {\pdfextension literal}
\protected\def\pdfstartlink {\pdfextension startlink\space}
Expand Down Expand Up @@ -32,9 +32,9 @@
\def\dosanitizecommand#1#2{\ifx\nxt#1\addF{#2}\fi}

\catcode`\[=1 \catcode`\]=2 \catcode`\{=12 \catcode`\}=12
\def\lbchar[{] \def\rbchar[}]
\def\lbchar[{] \def\rbchar[}]
\catcode`\[=12 \catcode`\]=12 \catcode`\{=1 \catcode`\}=2
\catcode`\~=12 \def\tildechar{~} \catcode`\~=13
\catcode`\~=12 \def\tildechar{~} \catcode`\~=13
\catcode`\|=0 |catcode`|\=12 |def|bschar{\} |catcode`|\=0 \catcode`\|=12
\def\makeoutlinetoks{\Tnumfalse\afterassignment\makeolproctok\let\nxt= }
\def\makeolnexttok{\afterassignment\makeolproctok\let\nxt= }
Expand Down Expand Up @@ -80,12 +80,12 @@
\else\ifx\nxt\\\ifinstr\addF{\bschar\bschar}\else\tokprocessedtrue\fi
\else\ifx\nxt\&\ifinstr\addF&\else\tokprocessedtrue\fi
\else\ifx\nxt\~\ifTnum\addF{0}\else\addF\tildechar\fi % 077->\T{\~77}
\else\ifx\nxt\_\ifTnum\addF{E}\else\addF_\fi % 0.1E5->\T{0.1\_5}
\else\ifx\nxt\^\ifTnum\addF{0x}\else\addF^\fi % 0x77 -> \T{\^77}
\else\ifx\nxt\\\\\ifTnum\addF{0b}\else\addF\\\fi % 0b10111 -> \T{\\10111}
\else\ifx\nxt\_\ifTnum\addF{E}\else\addF_\fi % 0.1E5->\T{0.1\_5}
\else\ifx\nxt\^\ifTnum\addF{0x}\else\addF^\fi % 0x77 -> \T{\^77}
\else\ifx\nxt\\\\\ifTnum\addF{0b}\else\addF\\\fi % 0b10111 -> \T{\\10111}
\else\ifx\nxt\$\ifTnum\tokprocessedtrue\else\addF$\fi %$% \T{77\$L}
\else\ifx\nxt\{\addF\lbchar \else\ifx\nxt\}\addF\rbchar
\else\ifx\nxt\ \addF\space \else\ifx\nxt\#\addF{\string\#}%
\else\ifx\nxt\{\addF\lbchar\else\ifx\nxt\}\addF\rbchar
\else\ifx\nxt\ \addF\space\else\ifx\nxt\#\addF{\string\#}%
\else\ifx\nxt\PP\addF{++}\else\ifx\nxt\MM\addF{--}%
\fi\fi\fi\fi\fi \fi\fi\fi\fi\fi
\fi\fi\fi\fi\fi \fi\fi\fi\fi\fi
Expand Down
12 changes: 6 additions & 6 deletions source/texk/web2c/cwebdir/cwebmac.tex
Original file line number Diff line number Diff line change
@@ -1,19 +1,19 @@
% standard macros for CWEB listings (in addition to plain.tex)
% Version 4.11 --- September 2023
% Version 4.11 --- October 2023
\ifx\renewenvironment\undefined\else\endinput\fi % LaTeX will use other macros
\xdef\fmtversion{\fmtversion+CWEB4.11}
\chardef\cwebversion=4 \chardef\cwebrevision=11
\input iftex.sty % TeX engine tests
\ifx\pdf+\pdftrue\fi % for plain TeX in combination with dvipdfm
% Uncomment the following line if you want PDF goodies to be the default
%\ifx\pdf-\else\pdftrue\fi
\def\pdflinkcolor{0 0 1} % the RGB values for hyperlink color
\ifxetex\pdftrue\fi % XeTeX produces PDF output
\ifpdf \def\pdflinkcolor{0 0 1} \fi % the RGB values for hyperlink color
\let\ifacro=\ifpdf
\newif\ifacrohint \ifacro\acrohinttrue\fi \ifhint\acrohinttrue\fi
\newif\ifpdflua \ifluatex\pdfluatrue\fi \ifpdftex\pdfluatrue\fi
\ifpdflua % luaTeX and pdfTeX produce PDF output if \pdfoutput>0
\def\Black{\pdfliteral{0 g 0 G}} % use rgb colors for direct PDF output too
\ifpdflua % luaTeX and pdfTeX produce PDF output if \pdfoutput>0 (default)
\def\Black{\pdfliteral{0 g 0 G}} % use rgb colors for direct PDF output too
\def\Blue{\pdfliteral{\pdflinkcolor\space rg \pdflinkcolor\space RG}}
\fi

Expand Down Expand Up @@ -298,7 +298,7 @@
\newwrite\cont
\output{\setbox0=\page % the first page is garbage
\openout\cont=\contentsfile
\write\cont{\catcode `\noexpand\@=11\relax} % \makeatletter
\write\cont{\catcode `\noexpand\@=11\relax} % \makeatletter
\global\output{\normaloutput\page\lheader\rheader}}
\setpage
\vbox to \vsize{} % the first \topmark won't be null
Expand All @@ -310,7 +310,7 @@
\def\inx{\par\vskip6pt plus 1fil % we are beginning the index
\def\page{\box255 } \normalbottom
\write\cont{} % ensure that the contents file isn't empty
\write\cont{\catcode `\noexpand\@=12\relax} % \makeatother
\write\cont{\catcode `\noexpand\@=12\relax} % \makeatother
\closeout\cont % the contents information has been fully gathered
\output{\ifpagesaved\normaloutput{\box\sbox}\lheader\rheader\fi
\global\setbox\sbox=\page \global\pagesavedtrue \mark{\topmark}}
Expand Down
12 changes: 12 additions & 0 deletions source/texk/web2c/cwebdir/cwebman-w2c.ch
Original file line number Diff line number Diff line change
Expand Up @@ -354,3 +354,15 @@ Looking at those
\point 20. Furthermore, group titles can be converted to an arbitrary
@z

@x
\vfill\end
@y
\point 21. With modern \TeX\ engines like `\.{luatex}', `\.{pdftex}', and
`\.{xetex}' (but \\{not} with classic `\.{tex}') you can say `\.{\\input
pdfwebtocfront}' as the last command in the limbo section and run \TeX\
\\{twice} on your woven \.{CWEB} document, in order to shift the
table-of-contents to the front of the {\mc PDF} output.

\vfill\end
@z

27 changes: 11 additions & 16 deletions source/texk/web2c/cwebdir/cwebman.tex
Original file line number Diff line number Diff line change
Expand Up @@ -57,9 +57,6 @@
\noindent
\TeX\ is a trademark of the American Mathematical Society.

\noindent
Acrobat Reader is a trademark of Adobe Systems Incorporated.

\bigskip\noindent
The printed form of this manual is copyright \copyright\ 1994
by Addison-Wesley Publishing Company, Inc. All rights reserved.
Expand Down Expand Up @@ -1147,23 +1144,21 @@

Many people have of course noticed analogies between \.{CWEB} and the
World Wide Web. The \.{CWEB} macros are in fact set up so that the output of
\.{CWEAVE} can be converted easily into Portable Document Format,
with clickable hyperlinks that can be read with Adobe's Acrobat Reader,
using a widely available open-source program called \.{dvipdfm} developed
by Mark~A. Wicks. After using \.{CWEAVE} to convert \.{cob.w} into
\.{cob.tex}, you can prepare and view a hypertext version of the program
by giving the commands
\.{CWEAVE} can be converted easily into Portable Document Format, with
clickable hyperlinks that can be read with your favorite {\mc PDF} viewer,
using a widely available open-source program called \.{dvipdfm} developed by
Mark~A. Wicks. After using \.{CWEAVE} to convert \.{cob.w} into \.{cob.tex},
you can prepare a hypertext version of the program by giving the commands
$$\vbox{\halign{\.{#}\hfil\cr
tex "\\let\\pdf+ \\input cob"\cr
dvipdfm cob\cr
acroread cob.pdf\cr}}$$
dvipdfm cob\cr}}$$
instead of invoking \TeX\ in the normal way. (Thanks to Hans Hagen,
C\'esar Augusto Rorato Crusius, and Julian Gilbey
for the macros that make this work.)
Alternatively, thanks to H\`an Th\^e\kern-.3em\raise.3ex\hbox{\'{}} Th\`anh
and Andreas Scherer, you can generate \.{cob.pdf} in one step by simply
saying `\.{pdftex}~\.{cob}'.
Alternative ways to create PDF output from \.{CWEB} input are to say
Alternative ways to create {\mc PDF} output from \.{CWEB} input are to say
`\.{xetex}~\.{cob}' or `\.{luatex}~\.{cob}'.

Similar output for ``smart'' devices can be created with Martin Ruckert's
Expand Down Expand Up @@ -1743,9 +1738,9 @@
\\pdfURL\{the author\}\{mailto:andreas\\UNDER/github@@freenet.de\}\cr
or visit \\pdfURL\{his home page\}\{https://github.com/ascherer\}\cr}}$$
In a {\mc PDF} document, the first argument will appear in blue as
clickable text; the Acrobat reader, if correctly configured, will then
redirect those links to the user's browser and open either the
email client or the HTML viewer. In a hardcopy document, both arguments
clickable text; the {\mc PDF} viewer, if correctly configured, will then
redirect those links to the user's browser and open either the email client
or the {\mc HTML} viewer. In a hardcopy document, both arguments
will be printed ({\tt the second in parentheses and typewriter type}).
Certain special characters in an Internet address need to be handled
in a somewhat awkward way, so that \.{CWEAVE} and/or \TeX\
Expand All @@ -1757,7 +1752,7 @@
others if the depth feature of \.{@*} has been used.
Such bookmark entries are also known as ``outlines.''
Moreover, the final group title, `Names of the sections',
can be opened up to list every section name; Acrobat users can therefore
can be opened up to list every section name; users can therefore
navigate easily to any desired section.

The macros of \.{cwebacromac.tex} are careful to ``sanitize'' all the names
Expand Down
4 changes: 2 additions & 2 deletions source/texk/web2c/cwebdir/texinputs/pdfctproofmac.tex
Original file line number Diff line number Diff line change
Expand Up @@ -9,13 +9,13 @@
\ifx\pdf+\pdftrue\fi % for plain TeX in combination with dvipdfm
% Uncomment the following line if you want PDF goodies to be the default
%\ifx\pdf-\else\pdftrue\fi
\def\pdflinkcolor{0 0 1} % the RGB values for hyperlink color
\ifxetex\pdftrue\fi % XeTeX produces PDF output
\ifpdf \def\pdflinkcolor{0 0 1} \fi % the RGB values for hyperlink color
\let\ifacro=\ifpdf
\newif\ifacrohint \ifacro\acrohinttrue\fi \ifhint\acrohinttrue\fi
\newif\ifpdflua \ifluatex\pdfluatrue\fi \ifpdftex\pdfluatrue\fi
\ifpdflua % luaTeX and pdfTeX produce PDF output if \pdfoutput>0
\def\Black{\pdfliteral{0 g 0 G}} % use rgb colors for direct PDF output too
\def\Black{\pdfliteral{0 g 0 G}} % use rgb colors for direct PDF output too
\def\Blue{\pdfliteral{\pdflinkcolor\space rg \pdflinkcolor\space RG}}
\fi

Expand Down
4 changes: 2 additions & 2 deletions source/texk/web2c/cwebdir/texinputs/pdfctwimac.tex
Original file line number Diff line number Diff line change
Expand Up @@ -10,8 +10,8 @@
\ifx\pdf+\pdftrue\fi % for plain TeX in combination with dvipdfm
% Uncomment the following line if you want PDF goodies to be the default
%\ifx\pdf-\else\pdftrue\fi
\def\pdflinkcolor{0 0 1} % the RGB values for hyperlink color
\ifxetex\pdftrue\fi % XeTeX produces PDF output
\ifpdf \def\pdflinkcolor{0 0 1} \fi % the RGB values for hyperlink color
\let\ifacro=\ifpdf
\ifhint\message{These macros are not suitable for HiTeX.}
\message{Please use 'ctwill +P [+lpdf]' instead.}
Expand All @@ -20,7 +20,7 @@
\newif\ifacrohint \ifacro\acrohinttrue\fi \ifhint\acrohinttrue\fi
\newif\ifpdflua \ifluatex\pdfluatrue\fi \ifpdftex\pdfluatrue\fi
\ifpdflua % luaTeX and pdfTeX produce PDF output if \pdfoutput>0
\def\Black{\pdfliteral{0 g 0 G}} % use rgb colors for direct PDF output too
\def\Black{\pdfliteral{0 g 0 G}} % use rgb colors for direct PDF output too
\def\Blue{\pdfliteral{\pdflinkcolor\space rg \pdflinkcolor\space RG}}
\fi

Expand Down
2 changes: 1 addition & 1 deletion source/texk/web2c/tangle.ch
Original file line number Diff line number Diff line change
Expand Up @@ -681,7 +681,7 @@ Parse a Unix-style command line.

@<Define |parse_arguments|@> =
procedure parse_arguments;
const n_options = 10; {Pascal won't count array lengths for us.}
const n_options = 9; {Pascal won't count array lengths for us.}
var @!long_options: array[0..n_options] of getopt_struct;
@!getopt_return_val: integer;
@!option_index: c_int_type;
Expand Down
2 changes: 1 addition & 1 deletion source/texk/web2c/tangleboot.pin
Original file line number Diff line number Diff line change
Expand Up @@ -61,7 +61,7 @@ end{:32}else{33:}begin writeln(stdout,'. (l.',line:1,')');
for j:=1 to outptr do write(stdout,xchr[outbuf[j-1]]);
write(stdout,'... ');end{:33};fflush(stdout);history:=2;
{debugskipped:=debugcycle;debughelp;}end;
{:31}{188:}procedure parsearguments;const noptions=10;
{:31}{188:}procedure parsearguments;const noptions=9;
var longoptions:array[0..noptions]of getoptstruct;
getoptreturnval:integer;optionindex:cinttype;currentoption:0..noptions;
len:integer;begin{190:}currentoption:=0;
Expand Down
4 changes: 2 additions & 2 deletions source/texk/web2c/weav-twill.ch
Original file line number Diff line number Diff line change
Expand Up @@ -692,9 +692,9 @@ var lhs:integer;
Section 264.

@x WEAVE.CH
const n_options = 5; {Pascal won't count array lengths for us.}
@y
const n_options = 4; {Pascal won't count array lengths for us.}
@y
const n_options = 3; {Pascal won't count array lengths for us.}
@z

@x WEAVE.CH
Expand Down
2 changes: 1 addition & 1 deletion source/texk/web2c/weave.ch
Original file line number Diff line number Diff line change
Expand Up @@ -563,7 +563,7 @@ Parse a Unix-style command line.
@<Define |parse_arguments|@> =
procedure parse_arguments;
const n_options = 5; {Pascal won't count array lengths for us.}
const n_options = 4; {Pascal won't count array lengths for us.}
var @!long_options: array[0..n_options] of getopt_struct;
@!getopt_return_val: integer;
@!option_index: c_int_type;
Expand Down

0 comments on commit 306fa68

Please sign in to comment.