summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/latex/base/ltfsstrc.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/latex/base/ltfsstrc.dtx')
-rw-r--r--Master/texmf-dist/source/latex/base/ltfsstrc.dtx105
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}
%