diff options
Diffstat (limited to 'Master/texmf-dist/source/latex/base/ltfsstrc.dtx')
-rw-r--r-- | Master/texmf-dist/source/latex/base/ltfsstrc.dtx | 105 |
1 files changed, 32 insertions, 73 deletions
diff --git a/Master/texmf-dist/source/latex/base/ltfsstrc.dtx b/Master/texmf-dist/source/latex/base/ltfsstrc.dtx index 4e57e28fc30..69fa94a34ff 100644 --- a/Master/texmf-dist/source/latex/base/ltfsstrc.dtx +++ b/Master/texmf-dist/source/latex/base/ltfsstrc.dtx @@ -1,6 +1,6 @@ % \iffalse meta-comment % -% Copyright 1993-2014 +% Copyright 1993-2015 % The LaTeX3 Project and any individual authors listed elsewhere % in this file. % @@ -34,16 +34,16 @@ % %<package>\NeedsTeXFormat{LaTeX2e}[1995/05/16] %<package>\ProvidesPackage{tracefnt} -%<package> [2014/09/29 v3.0j Standard LaTeX package (font tracing)] +%<package> [2015/02/21 v3.0k Standard LaTeX package (font tracing)] % \fi % \ProvidesFile{ltfsstrc.dtx} -% [2014/09/29 v3.0j LaTeX Kernel (NFSS tracing)] +% [2015/02/21 v3.0k LaTeX Kernel (NFSS tracing)] % % \iffalse %<+checkmem>\CHECKMEM % \fi % -% \CheckSum{1041} +% \CheckSum{1034} % % % @@ -59,6 +59,8 @@ % {(DPC) Fix \cs{ProvidesFile} usage} % \changes{v3.0a}{1995/05/24} % {(DPC) Make file from previous file, tracefnt 1995/05/16 v2.3o} +% \changes{v3.0k}{2015/02/21} +% {Removed autoload code} % % \changes{v2.3m}{1994/11/18} % {\cs{next} to \cs{reserved@f}} @@ -97,6 +99,7 @@ % \author{Frank Mittelbach \and Rainer Sch\"opf} % % +% \MaintainedByLaTeXTeam{latex} % \maketitle % % \section{Introduction} @@ -209,13 +212,13 @@ % \changes{v1.0o}{1990/04/01} % {Check if \cs{tracingfonts} defined removed again.} % \begin{macrocode} -%<*2ekernel|autoload> +%<*2ekernel> \def\tracingfonts{% \@font@warning{Command \noexpand\tracingfonts not provided.\MessageBreak Use the `tracefnt' package.\MessageBreak Command found:}% \count@} -%</2ekernel|autoload> +%</2ekernel> % \end{macrocode} % The |\count@| in the line above will remove the number after % |\tracingfonts|. Note that this definition will be overwritten be @@ -308,14 +311,14 @@ % % We also need a default definition inside the kernel: % \begin{macrocode} -%<*2ekernel|autoload> +%<*2ekernel> \def\@font@info#1{% \GenericInfo{(Font)\@spaces\@spaces\@spaces\space\space}% {LaTeX Font Info: \space\space\space#1}}% \def\@font@warning#1{% \GenericWarning{(Font)\@spaces\@spaces\@spaces\space\space}% {LaTeX Font Warning: #1}}% -%</2ekernel|autoload> +%</2ekernel> % \end{macrocode} % % @@ -343,7 +346,7 @@ % font file (the \texttt{.tfm}) as it was determined by the NFSS % tables. % \begin{macrocode} -%<*2ekernel|package|autoload> +%<*2ekernel|package> \def\extract@font{% \get@external@font % \end{macrocode} @@ -375,7 +378,7 @@ \csname\curr@fontshape\endcsname \relax } -%</2ekernel|package|autoload> +%</2ekernel|package> % \end{macrocode} % The |\relax| at the end needs to be explained. % This is inserted to prevent \TeX{} from scanning too far @@ -390,7 +393,7 @@ % |\external@font|. If no font is found it will return the one % that was defined via |\DeclareErrorFont|. % \begin{macrocode} -%<*2ekernel|autoload> +%<*2ekernel> \def\get@external@font{% % \end{macrocode} % We don't know the external font name at the beginning. @@ -414,7 +417,7 @@ \get@external@font \fi\fi } -%</2ekernel|autoload> +%</2ekernel> % \end{macrocode} % \end{macro} % @@ -430,7 +433,7 @@ % The macro |\selectfont| is called whenever a font change must % take place. % \begin{macrocode} -%<*2ekernel|package|autoload> +%<*2ekernel|package> \DeclareRobustCommand\selectfont {% % \end{macrocode} @@ -691,7 +694,7 @@ %</trace> \fi } -%</2ekernel|package|autoload> +%</2ekernel|package> % \end{macrocode} % \end{macro} % \end{macro} @@ -703,7 +706,7 @@ % a factor when assigning a value to |\baselineskip|. % We use 1 as a default (i.e.\ no stretch). % \begin{macrocode} -%<*2ekernel|autoload> +%<*2ekernel> \def\baselinestretch{1} % \end{macrocode} % \end{macro} @@ -718,7 +721,7 @@ % \begin{macrocode} \newtoks\every@math@size \every@math@size={} -%</2ekernel|autoload> +%</2ekernel> % \end{macrocode} % \end{macro} % @@ -803,7 +806,7 @@ % \ref{it:everymath} to \ref{it:everymathend} except that instead % of a switch the macro |\init@restore@glb@settings| is used. % \begin{macrocode} -%<*2ekernel|package|autoload> +%<*2ekernel|package> \def\check@mathfonts{% \ifx \glb@currsize \f@size %<*trace> @@ -1031,7 +1034,7 @@ % \begin{macrocode} %<+debug> \poptracing } -%</2ekernel|package|autoload> +%</2ekernel|package> % \end{macrocode} % \end{macro} % @@ -1046,7 +1049,7 @@ % reproduces it argument. % \changes{v2.3n}{1995/05/08}{Use \cs{@firstofone}} % \begin{macrocode} -%<*2ekernel|autoload> +%<*2ekernel> \def\ifnot@nil#1{\def\reserved@a{#1}% \ifx\reserved@a\@nnil \expandafter\@gobble \else \expandafter\@firstofone\fi} @@ -1066,7 +1069,6 @@ \def\remove@to@nnil#1\@nnil{} \def\remove@angles#1>{\set@simple@size@args} \def\remove@star#1*{#1} -%</2ekernel|autoload> % \end{macrocode} % \end{macro} % \end{macro} @@ -1077,7 +1079,6 @@ % This macro takes a size specification and parses it into size % function and the optional and mandatory arguments. % \begin{macrocode} -%<*2ekernel|def2|autoload> \def\extract@sizefn#1*#2\@nil{% \if>#2>\set@size@funct@args#1\@nil \let\sizefn@info\@empty @@ -1342,7 +1343,6 @@ \fi \fi \reserved@f}} -%</2ekernel|def2|autoload> % \end{macrocode} % \end{macro} % @@ -1351,10 +1351,8 @@ % We use two dimen registers |\lower@bound| and |\upper@bound| % to store the lower and upper endpoints of the range we found. % \begin{macrocode} -%<*2ekernel|autoload> \newdimen\lower@bound \newdimen\upper@bound -%</2ekernel|autoload> % \end{macrocode} % \end{macro} % \end{macro} @@ -1366,7 +1364,6 @@ % that there is always something in the pipeline since the very % last entry is a faked range (see above). % \begin{macrocode} -%<*2ekernel|def2|autoload> \def\check@single#1>#2<#3\@nnil{% % \end{macrocode} % We start by assuming that @@ -1415,7 +1412,7 @@ \def\set@size@funct@args@[#1]#2\@nil{% \def\mandatory@arg{#2}% \def\optional@arg{#1}} -%</2ekernel|def2|autoload> +%</2ekernel> % \end{macrocode} % \end{macro} % \end{macro} @@ -1428,10 +1425,10 @@ % mandatory argument that may follow the size specification |<...>|. % \changes{v2.1c}{1993/03/18}{Added all args to avoid blanks problems} % \begin{macrocode} -%<*2ekernel|autoload> +%<*2ekernel> \def\DeclareSizeFunction#1#2{\@namedef{s@fct@#1}{#2}} \@onlypreamble\DeclareSizeFunction -%</2ekernel|autoload> +%</2ekernel> % \end{macrocode} % \end{macro} % @@ -1441,8 +1438,8 @@ % is that calling an undefined size function will do nothing % (actually execute a |\relax|). % \begin{macrocode} -%<*2ekernel|package|autoload> -\def\execute@size@function#1{% %%% could be added to autoload as well +%<*2ekernel|package> +\def\execute@size@function#1{% %<*trace> \@ifundefined{s@fct@#1}% {\errmessage{Undefined font size function #1}% @@ -1451,7 +1448,7 @@ %</trace> %<-trace> \csname s@fct@#1\endcsname } -%</2ekernel|package|autoload> +%</2ekernel|package> % \end{macrocode} % \end{macro} % @@ -1467,11 +1464,10 @@ % Note the |<-*\@nil><| token at the end to stop scanning. % \changes{v2.0b}{1992/07/26}{} % \begin{macrocode} -%<*2ekernel|def2|autoload> +%<*2ekernel> \def\try@size@range{% \expandafter\extract@rangefontinfo\font@info <-*>\@nil<\@nnil } -%</2ekernel|def2|autoload> % \end{macrocode} % \end{macro} % @@ -1483,7 +1479,6 @@ % of the ranges the whole list of size specifications is searched for % a nearby simple size. % \begin{macrocode} -%<*2ekernel|def1> \gdef\try@size@substitution{% % \end{macrocode} % First we do some initializations. |\@tempdimb| @@ -1499,10 +1494,6 @@ % \begin{macrocode} \expandafter \try@simples \font@info <\number\@M>\@nil<\@nnil } -%</2ekernel|def1> -%<*autoload> -\def\try@size@substitution{\try@simples\try@size@substitution} -%</autoload> % \end{macrocode} % \end{macro} % @@ -1517,10 +1508,9 @@ % |\fontsubfuzz| contains the amount that will not cause terminal % warnings (warnings still go into the transcript file). % \begin{macrocode} -%<*2ekernel|autoload> \def\font@submax{0pt} \def\fontsubfuzz{.4pt} -%</2ekernel|autoload> +%</2ekernel> %<+package>\def\fontsubfuzz{0pt} % \end{macrocode} % \end{macro} @@ -1535,13 +1525,9 @@ % It looks for simple sizes to determine the two closest sizes. % It is assumed that simple sizes are in increasing order. % \begin{macrocode} -%<*2ekernel|def1> +%<*2ekernel> \gdef\try@simples#1<#2>{% \tryif@simple#2->\tryif@simple} -%</2ekernel|def1> -%<*autoload> -\def\try@simples{\@autoload{fss1}} -%</autoload> % \end{macrocode} % \end{macro} % @@ -1557,7 +1543,6 @@ % First it checks whether it is finished already, then whether the % size specification in question is a simple one. % \begin{macrocode} -%<*2ekernel|def1> \gdef\tryif@simple#1-#2\tryif@simple{% % \end{macrocode} % Most common case for |\reserved@f| first: @@ -1646,7 +1631,6 @@ % If it's a range iterate also. % \begin{macrocode} \reserved@f} -%</2ekernel|def1> % \end{macrocode} % \end{macro} % @@ -1665,14 +1649,11 @@ % |\f@size| multiplied by the optional argument otherwise. % \changes{v2.0b}{1992/07/26}{} % \begin{macrocode} -%<*2ekernel|autoload> \DeclareSizeFunction{}{\empty@sfcnt\@font@warning} \DeclareSizeFunction{s}{\empty@sfcnt\@font@info} -%</2ekernel|autoload> % \end{macrocode} % % \begin{macrocode} -%<*2ekernel|def2|autoload> \def\empty@sfcnt#1{% \@tempdimb \f@size\p@ \ifx\optional@arg\@empty @@ -1683,7 +1664,6 @@ scaled\space to\space size\space \the\@tempdimb}% \fi \edef\external@font{\mandatory@arg\space at\the\@tempdimb}} -%</2ekernel|def2|autoload> % \end{macrocode} % \end{macro} % @@ -1698,18 +1678,14 @@ % if no optional argument is present, and to |\f@size| multiplied % by the optional argument otherwise. % \begin{macrocode} -%<*2ekernel|autoload> \DeclareSizeFunction{gen}{\gen@sfcnt\@font@warning} \DeclareSizeFunction{sgen}{\gen@sfcnt\@font@info} -%</2ekernel|autoload> % \end{macrocode} % % \begin{macrocode} -%<*2ekernel|def2|autoload> \def\gen@sfcnt{% \edef\mandatory@arg{\mandatory@arg\f@size}% \empty@sfcnt} -%</2ekernel|def2|autoload> % \end{macrocode} % \end{macro} % \end{macro} @@ -1724,18 +1700,14 @@ % if no optional argument is present, and to |\f@size| multiplied % by the optional argument otherwise. % \begin{macrocode} -%<*2ekernel|autoload> \DeclareSizeFunction{genb}{\genb@sfcnt\@font@warning} \DeclareSizeFunction{sgenb}{\genb@sfcnt\@font@info} -%</2ekernel|autoload> % \end{macrocode} % % \begin{macrocode} -%<*2ekernel|def2|autoload> \def\genb@sfcnt{% \edef\mandatory@arg{\mandatory@arg\expandafter\genb@x\f@size..\@@}% \empty@sfcnt} -%</2ekernel|def2|autoload> % \end{macrocode} % \end{macro} % \end{macro} @@ -1746,10 +1718,8 @@ % The auxiliary macros |\genb@x| and |\genb@y| are used to convert % the |\f@size| into centipoints. % \begin{macrocode} -%<*2ekernel|def2|autoload> \def\genb@x#1.#2.#3\@@{\two@digits{#1}\genb@y#200\@@} \def\genb@y#1#2#3\@@{#1#2} -%</2ekernel|def2|autoload> % \end{macrocode} % \end{macro} % \end{macro} @@ -1764,14 +1734,11 @@ % prepend the encoding scheme. % \changes{v2.0b}{1992/07/26}{} % \begin{macrocode} -%<*2ekernel|autoload> \DeclareSizeFunction{sub}{\sub@sfcnt\@font@warning} \DeclareSizeFunction{ssub}{\sub@sfcnt\@font@info} -%</2ekernel|autoload> % \end{macrocode} % % \begin{macrocode} -%<*2ekernel|def2|autoload> \def\sub@sfcnt#1{% \edef\mandatory@arg{\f@encoding/\mandatory@arg}% % \end{macrocode} @@ -1818,7 +1785,6 @@ % \begin{macrocode} \do@subst@correction } -%</2ekernel|def2|autoload> % \end{macrocode} % \end{macro} % @@ -1831,21 +1797,17 @@ % The main difference to the default size function is the warning % message. % \begin{macrocode} -%<*2ekernel|autoload> \DeclareSizeFunction{subf}{\subf@sfcnt\@font@warning} \DeclareSizeFunction{ssubf}{\subf@sfcnt\@font@info} -%</2ekernel|autoload> % \end{macrocode} % % \begin{macrocode} -%<*2ekernel|def2|autoload> \def\subf@sfcnt#1{% #1{Font\space shape\space `\curr@fontshape'\space in\space size\space \f@size\space not\space available\MessageBreak external\space font\space `\mandatory@arg'\space used}% \empty@sfcnt#1% } -%</2ekernel|def2|autoload> % \end{macrocode} % \end{macro} % @@ -1857,14 +1819,11 @@ % If an optional argument is present it is used as the `at' % size for the font. Otherwise the font is loaded at its design size. % \begin{macrocode} -%<*2ekernel|autoload> \DeclareSizeFunction{fixed}{\fixed@sfcnt\@font@warning} \DeclareSizeFunction{sfixed}{\fixed@sfcnt\@font@info} -%</2ekernel|autoload> % \end{macrocode} % % \begin{macrocode} -%<*2ekernel|def2|autoload> \def\fixed@sfcnt#1{% \ifx\optional@arg\@empty \let\external@font\mandatory@arg @@ -1875,7 +1834,7 @@ for\space size\MessageBreak <\f@size>}% } -%</2ekernel|def2|autoload> +%</2ekernel> % \end{macrocode} % \end{macro} % |