% \iffalse meta-comment % % Copyright 1993-2018 % The LaTeX3 Project and any individual authors listed elsewhere % in this file. % % This file is part of the LaTeX base system. % ------------------------------------------- % % It may be distributed and/or modified under the % conditions of the LaTeX Project Public License, either version 1.3c % of this license or (at your option) any later version. % The latest version of this license is in % https://www.latex-project.org/lppl.txt % and version 1.3c or later is part of all distributions of LaTeX % version 2005/12/01 or later. % % This file has the LPPL maintenance status "maintained". % % The list of all files belonging to the LaTeX base distribution is % given in the file `manifest.txt'. See also `legal.txt' for additional % information. % % The list of derived (unpacked) files belonging to the distribution % and covered by LPPL is defined by the unpacking scripts (with % extension .ins) which are part of the distribution. % % \fi % % \iffalse %%% From File: ltfinal.dtx % %<*driver> % \fi \ProvidesFile{ltfinal.dtx} [2018/05/11 v2.1e LaTeX Kernel (Final Settings)] % \iffalse \documentclass{ltxdoc} \GetFileInfo{ltfinal.dtx} \title{\filename} \date{\filedate} \author{% Johannes Braams\and David Carlisle\and Alan Jeffrey\and Leslie Lamport\and Frank Mittelbach\and Chris Rowley\and Rainer Sch\"opf} \begin{document} \MaintainedByLaTeXTeam{latex} \maketitle \DocInput{ltfinal.dtx} \end{document} % % \fi % % % \section{Final settings} % This section contains the final settings for \LaTeX. It initialises % some debugging and typesetting parameters, sets the default % |\catcode|s and uc/lc codes, and inputs the hyphenation file. % % \StopEventually{} % % \changes{v0.1a}{1994/03/07}{Initial version, split from latex.dtx} % \changes{v0.1a}{1994/03/07}{Remove oldcomments environment} % \changes{v0.1c}{1994/04/21}{Added comments, set the catcodes of % 128--255.} % \changes{v0.1d}{1994/04/23}{Check that \cs{font@submax} is still zero} % \changes{v0.1e}{1994/05/02}{Set all the catcodes} % \changes{v0.1f}{1994/05/03}{Set the catcode of control-J to be % `other', for use in messages.} % \changes{v0.1g}{1994/05/05}{Added empty errhelp.} % \changes{v0.1h}{1994/05/13}{Added package ot1enc, and defined % \cs{@acci}, \cs{@accii} and \cs{@acciii}.} % \changes{v0.1j}{1994/05/18}{Corrected the lccode for d-bar.} % \changes{v0.1k}{1994/05/19}{Removed \cs{makeat...}} % \changes{v1.0n}{1994/05/31}{Renamed lthyphen.* to lthyphen.*.} % \changes{v1.0o}{1994/11/17} % {\cs{@tempa} to \cs{reserved@a}} % \changes{v1.0p}{1994/12/01} % {Renamed lthyphen.* to hyphen.*.} % \changes{v1.0r}{1995/06/05} % {Added \cs{MakeUppercase} and \cs{MakeLowercase}.} % \changes{v1.0s}{1995/06/06} % {Made \cs{MakeUppercase} and \cs{MakeLowercase} brace their % argument.} % \changes{v2.0r}{2016/10/15}{Require e\TeX{}} % \changes{v2.0s}{2016/10/15}{Tidy up status of char 127} % % \subsection{Debugging} % % By default, \LaTeX{} shows statistics: % \begin{macrocode} %<*2ekernel> \tracingstats1 % \end{macrocode} % % \subsection{Typesetting parameters} % % \begin{macro}{\@lowpenalty} % \begin{macro}{\@medpenalty} % \begin{macro}{\@highpenalty} % These are penalties used internally. % \begin{macrocode} \newcount\@lowpenalty \newcount\@medpenalty \newcount\@highpenalty % \end{macrocode} % \end{macro} % \end{macro} % \end{macro} % % %\begin{macro}{\newmarks} % \changes{v2.0a}{2014/12/30}{macro added} % \changes{v2.0b}{2015/01/23}{use reserved count 256} % \changes{v2.0g}{2015/06/19}{Use $-1$ for first range to get contiguous allocation} % Allocate extended marks types if etex is active. % Placed here at the end of the format % to increase compatibility with count allocations % in earlier releases. % \begin{macrocode} % %<*2ekernel|latexrelease> %\IncludeInRelease{2015/01/01}% % {\newmarks}{Extended Allocation}% % \end{macrocode} % % \begin{macrocode} \ifx\marks\@undefined\else \def\newmarks{% \e@alloc\marks \e@alloc@chardef{\count256}\m@ne\e@alloc@top} \fi % \end{macrocode} % % \begin{macrocode} % %\EndIncludeInRelease %\IncludeInRelease{0000/00/00}% % {\newmarks}{Extended Allocation}% %\let\newmarks\@undefined %\EndIncludeInRelease %<*2ekernel> % \end{macrocode} % \end{macro} % %\begin{macro}{\newXeTeXintercharclass} % \changes{v2.0a}{2014/12/30}{macro added} % \changes{v2.0b}{2015/01/23}{use reserved count 257} % \changes{v2.0f}{2015/04/28}{define \cs{xe@alloc@intercharclass} for compatibility with older xelatex initilisation} %\begin{macro}{\xe@alloc@intercharclass} %\begin{macro}{\e@alloc@intercharclass@top} % \changes{v2.0j}{2016/01/04}{Start allocation at one not three} % \changes{v2.0k}{2016/01/05}{Remove duplicated code} % Allocate |\XeTeXintercharclass| types if xetex is active. % previously defined in |xetex.ini|. % % \begin{macrocode} % %<*2ekernel|latexrelease> %\IncludeInRelease{2015/01/01}% % {\newXeTeXintercharclass}{Extended Allocation}% % \end{macrocode} % % Classes allocated 1 to 4094 (or 254 on older xetex) % (In earlier XeLaTeX versions 1, 2 and 3 were pre-set for CJK). % \changes{v2.0g}{2015/06/19}{Use $-1$ for first range to get contiguous allocation} % \changes{v2.0q}{2016/04/22}{XeTeX 0.99996 has 4096 char classes not 256} % \begin{macrocode} \ifx\XeTeXcharclass\@undefined \else % \end{macrocode} % \begin{macrocode} \ifdim\the\XeTeXversion\XeTeXrevision\p@>0.99993\p@ \chardef\e@alloc@intercharclass@top=4095 \else \chardef\e@alloc@intercharclass@top=255 \fi % \end{macrocode} % \begin{macrocode} \def\newXeTeXintercharclass{% \e@alloc\XeTeXcharclass \chardef\xe@alloc@intercharclass\m@ne\e@alloc@intercharclass@top} \fi % \end{macrocode} % % \begin{macrocode} % %\EndIncludeInRelease %\IncludeInRelease{0000/00/00}% % {\newXeTeXintercharclass}{Extended Allocation}% % \ifx\XeTeXcharclass\@undefined % \else % \def\xe@alloc@#1#2#3#4#5{\global\advance#1\@ne % \xe@ch@ck#1#4#2% % \allocationnumber#1% % \global#3#5\allocationnumber % \wlog{\string#5=\string#2\the\allocationnumber}} % \def\xe@ch@ck#1#2#3{% % \ifnum#1<#2\else % \errmessage{No room for a new #3}% % \fi} % \def\newXeTeXintercharclass{% % \xe@alloc@\xe@alloc@intercharclass % \XeTeXcharclass\chardef\@cclv} % \fi %\EndIncludeInRelease %<*2ekernel|latexrelease> %\IncludeInRelease{2016/02/01}% % {\xe@alloc@intercharclass}{Start of XeTeX class allocator}% \ifx\XeTeXcharclass\@undefined \else \countdef\xe@alloc@intercharclass=257 \xe@alloc@intercharclass=\z@ \fi % %\EndIncludeInRelease %\IncludeInRelease{2015/01/01}% % {\xe@alloc@intercharclass}{Start of XeTeX class allocator}% % \ifx\XeTeXcharclass\@undefined % \else % \xe@alloc@intercharclass=\thr@@ % \fi %\EndIncludeInRelease %\IncludeInRelease{0000/00/00}% % {\xe@alloc@intercharclass}{Start of XeTeX class allocator}% % \ifx\XeTeXcharclass\@undefined % \else % \newcount\xe@alloc@intercharclass % \xe@alloc@intercharclass=\thr@@ % \fi %\EndIncludeInRelease %<*2ekernel> % \end{macrocode} % \end{macro} % \end{macro} % \end{macro} % % % % The default values of the picture and |\fbox| parameters: % \begin{macrocode} \unitlength = 1pt \fboxsep = 3pt \fboxrule = .4pt % \end{macrocode} % The saved value of \TeX's |\maxdepth|: % \begin{macrocode} \@maxdepth = \maxdepth % \end{macrocode} % |\vsize| initialized because a |\clearpage| with |\vsize < \topskip| % causes trouble. % |\@colroom| and |\@colht| also initialized because |\vsize| may be % set to them if a |\clearpage| is done before the |\begin{document}| % % \begin{macrocode} \vsize = 1000pt \@colroom = \vsize \@colht = \vsize % \end{macrocode} % Initialise |\textheight| |\textwidth| and page style, to avoid % internal errors if they are not set by the class. % \changes{v0.1b}{1994/04/18} % {Initialise \cs{textheight}, \cs{textwidth} and page style} % \begin{macrocode} \textheight=.5\maxdimen \textwidth=\textheight \ps@empty % \end{macrocode} % % \subsection{Lccodes for hyphenation} % % \changes{v2.0a}{2015/01/03}{Unicode data loading added} % \changes{v2.0c}{2015/01/24}{Skip T1-code entirely with Unicode engines} % \changes{v2.0d}{2015/03/26}{Use renamed % \texttt{unicode-letters.def}} % \changes{v2.0i}{2015/12/10}{Use new common Unicode data loaders} % \changes{v2.0j}{2016/01/04}{Do not set up inter character classes for % XeTeX} % \changes{v2.0l}{2016/01/05}{Correct \textsf{latexrelease} guards} % \changes{v2.0l}{2016/01/05}{Ensure old definitions for inter-character % class toks are available using \textsf{latexrelease}} % \changes{v2.0m}{2016/01/05}{Undefine XeTeX classes when using patching % an older kernel} % \changes{v2.0l}{2016/01/05}{Missing brace} % \changes{v2.0p}{2016/01/05}{Only apply XeTeX change if XeTeX is in use} % For $7$- and $8$-bit engines the assumption of T1 encodings is the % basis for the hyphenation patterns. That's not the case for the Unicode % engines, where the assumption is engine-native working. The common % loader system provides access to data from the Unicode Consortium % covering not only |\lccode| but also other related data. The % |\lccode| part of that at least needs to be loaded before hyphenation is % tackled: Xe\TeX{} follows the standard \TeX{} route of building patterns % into the format. Lua\TeX{} doesn't require this data be loaded \emph{here} % but it does need to be loaded somewhere. Rather than test for the Unicode % engines by name, the approach here is to look for the extended math mode % handling both provide: any other engine developed in this area will % presumably also provide |\Umathcode|. % \begin{macrocode} \ifnum 0% \ifx\Umathcode\@undefined\else 1\fi \ifx\XeTeXmathcode\@undefined\else 1\fi >\z@ \message{ Unicode character data,} \input{load-unicode-data} % %\IncludeInRelease{2016/02/01}% % {\XeTeXintercharclasses}{XeTeX character classes}% % \ifx\XeTeXinterchartoks\undefined % \else % \begingroup % \chardef\XeTeXcharclassID = 0 % % \chardef\XeTeXcharclassOP = 0 % % \chardef\XeTeXcharclassCL = 0 % % \chardef\XeTeXcharclassEX = 0 % % \chardef\XeTeXcharclassIS = 0 % % \chardef\XeTeXcharclassNS = 0 % % \chardef\XeTeXcharclassCM = 0 % % \input{load-unicode-xetex-classes} % \endgroup % \global\let\xtxHanGlue\undefined % \global\let\xtxHanSpace\undefined % \global\XeTeXinterchartoks 0 1 = {} % \global\XeTeXinterchartoks 0 2 = {} % \global\XeTeXinterchartoks 0 3 = {} % \global\XeTeXinterchartoks 1 0 = {} % \global\XeTeXinterchartoks 2 0 = {} % \global\XeTeXinterchartoks 3 0 = {} % \global\XeTeXinterchartoks 1 1 = {} % \global\XeTeXinterchartoks 1 2 = {} % \global\XeTeXinterchartoks 1 3 = {} % \global\XeTeXinterchartoks 2 1 = {} % \global\XeTeXinterchartoks 2 2 = {} % \global\XeTeXinterchartoks 2 3 = {} % \global\XeTeXinterchartoks 3 1 = {} % \global\XeTeXinterchartoks 3 2 = {} % \global\XeTeXinterchartoks 3 3 = {} % \fi %\EndIncludeInRelease %\IncludeInRelease{0000/00/00}% % {\XeTeXintercharclasses}{XeTeX character classes}% % \ifx\XeTeXinterchartoks\undefined % \else % \input{load-unicode-xetex-classes} % \gdef\xtxHanGlue{\hskip0pt plus 0.1em\relax} % \gdef\xtxHanSpace{\hskip0.2em plus 0.2em minus 0.1em\relax} % \global\XeTeXinterchartoks 0 1 = {\xtxHanSpace} % \global\XeTeXinterchartoks 0 2 = {\xtxHanSpace} % \global\XeTeXinterchartoks 0 3 = {\nobreak\xtxHanSpace} % \global\XeTeXinterchartoks 1 0 = {\xtxHanSpace} % \global\XeTeXinterchartoks 2 0 = {\nobreak\xtxHanSpace} % \global\XeTeXinterchartoks 3 0 = {\xtxHanSpace} % \global\XeTeXinterchartoks 1 1 = {\xtxHanGlue} % \global\XeTeXinterchartoks 1 2 = {\xtxHanGlue} % \global\XeTeXinterchartoks 1 3 = {\nobreak\xtxHanGlue} % \global\XeTeXinterchartoks 2 1 = {\nobreak\xtxHanGlue} % \global\XeTeXinterchartoks 2 2 = {\nobreak\xtxHanGlue} % \global\XeTeXinterchartoks 2 3 = {\xtxHanGlue} % \global\XeTeXinterchartoks 3 1 = {\xtxHanGlue} % \global\XeTeXinterchartoks 3 2 = {\xtxHanGlue} % \global\XeTeXinterchartoks 3 3 = {\nobreak\xtxHanGlue} % \fi %\EndIncludeInRelease %<*2ekernel> % \end{macrocode} % \changes{v2.0d}{2015/02/03}{Set \cs{lccode} for \texttt{-} with Unicode % engines} % There is one over-ride that makes sense here (see below for the same for % $8$-bit engines): setting the lccode for |-| to itself. % \begin{macrocode} \lccode`\- =`\- % default hyphen char % \end{macrocode} % The alternative is that a ``traditional'' engine is in use. % \begin{macrocode} \else % \end{macrocode} % \changes{v1.1b}{1998/05/20}{Set up lccodes before loading % hyphenation files: pr/2639} % We set things up so that hyphenation files can assume that the % default (T1) lccodes are in use (at present this also sets up the % uccodes). % We temporarily define |\reserved@a| to apply |\reserved@c| to % all the numbers in the range of its arguments. % \begin{macrocode} \def\reserved@a#1#2{% \@tempcnta#1\relax \@tempcntb#2\relax \reserved@b } \def\reserved@b{% \ifnum\@tempcnta>\@tempcntb\else \reserved@c\@tempcnta \advance\@tempcnta\@ne \expandafter\reserved@b \fi } % \end{macrocode} % Depending on the \TeX{} version, we might not be allowed to do % this for non-ASCII characters. % \changes{v1.0n}{1994/06/09}{For \TeX2, do not set codes for higher % half of character table.} % \begin{macrocode} \def\reserved@c#1{% \count@=#1\advance\count@ by -"20 \uccode#1=\count@ \lccode#1=#1 } \reserved@a{`\a}{`\z} \reserved@a{"A0}{"BC} \reserved@a{"E0}{"FF} % \end{macrocode} % The upper case characters need their |\uccode| and |\lccode| values % set, and their |\sfcode| set to 999. % \begin{macrocode} \def\reserved@c#1{% \count@=#1\advance\count@ by "20 \uccode#1=#1 \lccode#1=\count@ \sfcode#1=999 } \reserved@a{`\A}{`\Z} \reserved@a{"80}{"9C} \reserved@a{"C0}{"DF} % \end{macrocode} % Well, it would be nice if that were correct, but unfortunately, the % Cork encoding contains some odd slots whose uccode or lccode isn't % quite what you'd expect. % \begin{macrocode} \uccode`\^^Y=`\I % dotless i \lccode`\^^Y=`\^^Y % dotless i \uccode`\^^Z=`\J % dotless j, ae in OT1 \lccode`\^^Z=`\^^Z % dotless j, ae in OT1 \lccode`\^^9d=`\i % dotted I \uccode`\^^9d=`\^^9d % dotted I \lccode`\^^9e=`\^^9e % d-bar \uccode`\^^9e=`\^^d0 % d-bar % \end{macrocode} % Finally here is one that helps hyphenation in the OT1 encoding. % \changes{v1.0z}{1996/10/31} % {Added extra \cs{lcode}, hoping it does no harm in T1 (pr/1969)} % \begin{macrocode} \lccode`\^^[=`\^^[ % oe in OT1 % \end{macrocode} % % And we also set the |\lccode| of |\-| and |\textcompwordmark| so % that they do not prevent hyphenation in the remainder of the word % (as suggested by Lars Helstr\"om). % \changes{v1.1e}{2003/10/13} % {Added extra \cs{lccode} for \cs{-} and \cs{textcompwordmark}} % \begin{macrocode} \lccode`\- =`\- % default hyphen char \lccode 127=127 % alternate hyphen char \lccode 23 =23 % textcompwordmark in T1 % \end{macrocode} % % End of the conditional to select either Unicode or T1 encoding defaults. % \begin{macrocode} \fi % \end{macrocode} % % This is as good a place as any to active a few Xe\TeX{}-specific % settings % \begin{macrocode} \ifx\XeTeXuseglyphmetrics\@undefined \else \XeTeXuseglyphmetrics=1 % \XeTeXdashbreakstate=1 % \fi % \end{macrocode} % % \subsection{Hyphenation} % % \changes{v0.1a}{1994/03/07}{move code here from lhyphen.dtx} % \changes{v0.1a}{1994/03/07} % {use \cs{InputIfFileExists} not \cs{IfFileExists}} % \changes{v1.0x}{1995/11/01} % {(DPC) Switch meaning of \cs{@addtofilelist} for cfg files}% % The following code will be compiled into the format file. It checks % for the existence of \texttt{hyphen.cfg} in inputs that file if % found. Otherwise it inputs \texttt{hyphen.ltx}. Note that these % are loaded in \emph{before} the |\catcode|s are set, so local % hyphenation files can use 8-bit input. % % We try to load the customized hyphenation description file. % \begin{macrocode} \InputIfFileExists{hyphen.cfg} {\typeout{===========================================^^J% Local configuration file hyphen.cfg used^^J% ===========================================}% \def\@addtofilelist##1{\xdef\@filelist{\@filelist,##1}}% } {\input{hyphen.ltx}} \let\@addtofilelist\@gobble % \end{macrocode} % % \begin{macro}{\l@nohyphenation} % \changes{v2.0t}{2017/03/09}{ensure \cs{l@nohyphenation} is defined.} % \begin{macrocode} \ifx\l@nohyphenation \@undefined \newlanguage\l@nohyphenation \fi % \end{macrocode} % \end{macro} % \begin{macro}{\document@default@language} % Default document language. -1 acts as language 0, but used as a flag in |\document| % to see if it has been set in the preamble. % \begin{macrocode} \let\document@default@language\m@ne % \end{macrocode} % \end{macro} % % % % \subsection{Font loading} % Fonts loaded during the formatting process might already have % changed the |\font@submax| from |0pt| to something higher. % If so, we put out a bold warning. % \changes{v0.1l}{1994/05/20}{Use new font warning commands} % \changes{v1.1c}{2000/08/23}{Fix typo in warning} % \begin{macrocode} \ifdim \font@submax >\z@ \@font@warning{Size substitutions with differences\MessageBreak up to \font@submax\space have occurred.\MessageBreak \MessageBreak Please check the transcript file carefully\MessageBreak and redo the format generation if necessary! \@gobbletwo}% \errhelp{Only stopped, to give you time to read the above message.} \errmessage{} % \end{macrocode} % We reset the macro. Otherwise every user will get a warning on % every job. % \begin{macrocode} \def\font@submax{0pt} \fi % \end{macrocode} % % \subsection{Input encoding} % % \changes{v2.1a}{2018/03/25}{default to UTF-8} % Starting with the 2018 \LaTeX\ release default the inputencoding % to UTF-8. Unless the format is being used with luatex, xetex, enctex or mltex. % % This is done in a way largely compatible with older releases: |utf8.def| is input just as if\\ % |\usepackage[utf8]{inputenc}|\\ % had been used, however rather than input the whole package a minimal core part just enough to support % loading the UTF-8 encoding iles is defined here. % % If a document re-specifies UTF-8 this is silently ignored. % % \begin{macrocode} % %<*2ekernel|latexrelease> % \end{macrocode} % % Check that a classic 8-bit tex engine is being used (LaTeX or PDFLaTeX). % % \begin{macrocode} %\IncludeInRelease{2018/04/01}% % {\UTFviii@invalid}{UTF-8 default}% % \end{macrocode} % % % Skip this section in Unicode TeX, or if MLTeX and EncTeX are enabled. % \begin{macrocode} \ifnum0% \ifx\Umathchar\@undefined\else 1\fi \ifx\mubyte\@undefined\else 1\fi \ifx\charsubdef\@undefined\else 1\fi =\z@ % \end{macrocode} % % \begin{macrocode} \def\saved@space@catcode{10} \let\@inpenc@test\relax \def\IeC{% \ifx\protect\@typeset@protect \expandafter\@firstofone \else \noexpand\IeC \fi } % \end{macrocode} % % Make characters active for UTF-8 input formats % \begin{macrocode} \@tempcnta=1 \loop \catcode\@tempcnta=13 % \advance\@tempcnta\@ne % \ifnum\@tempcnta<32 % \repeat % \catcode0=15 % null \catcode9=10 % tab \catcode10=12 % ctrl J \catcode12=13 % ctrl L \catcode13=5 % newline \@tempcnta=128 \loop \catcode\@tempcnta=13 \advance\@tempcnta\@ne \ifnum\@tempcnta<256 \repeat % \end{macrocode} % % \begin{macro}{\UseRawInputEncoding} % \changes{v2.1a}{2018/03/25}{Macro added} % Reset 8 bit characters to catcode 12 so the input endcoing matches the ``Raw'' % font encoding. % Useful for special behaviours, or for compatibility with older \LaTeX\ formats. % \changes{v2.1b}{2018/04/06}{Undo changes to \cs{DeclareFontEncoding@} and % definition of \cs{DeclareUnicodeCharacter}} % \changes{v2.1c}{2018/04/07}{Undefine \cs{inputencodingname}} % \begin{macrocode} \def\UseRawInputEncoding{% \let\inputencodingname\@undefined % revert \let\DeclareFontEncoding@\DeclareFontEncoding@saved % revert \let\DeclareUnicodeCharacter\@undefined % revert \@tempcnta=1 \loop \catcode\@tempcnta=15 % \advance\@tempcnta\@ne % \ifnum\@tempcnta<32 % \repeat % \catcode0=15 % null \catcode9=10 % tab \catcode10=12 % ctrl J \catcode12=13 % ctrl L \catcode13=5 % newline \@tempcnta=128 \loop \catcode\@tempcnta=12 \advance\@tempcnta\@ne \ifnum\@tempcnta<256 \repeat } % \end{macrocode} % \end{macro} % % \begin{macro}{\DeclareFontEncoding@saved} % Saved version of |\DeclareFontEncoding@| before \texttt{utf8.def} % modifies it for use in |\UseRawInputEncoding| above. % \begin{macrocode} \let\DeclareFontEncoding@saved\DeclareFontEncoding@ % \end{macrocode} % \end{macro} % % \changes{v2.1d}{2018/04/08}{Delay full UTF-8 handling to \cs{everyjob}} % \changes{v2.18}{2018/05/11}{Make invalit UTF-8 also safe, for legacy filesystem encodings} % \begin{macrocode} \edef\inputencodingname{utf8}% \input{utf8.def} \let\UTFviii@undefined@err@@\UTFviii@undefined@err \let\UTFviii@invalid@err@@\UTFviii@invalid@err \let\UTFviii@two@octets@@\UTFviii@two@octets \let\UTFviii@three@octets@@\UTFviii@three@octets \let\UTFviii@four@octets@@\UTFviii@four@octets %<2ekernel>\def\UTFviii@undefined@err#1{\@gobble#1}% %<2ekernel>\let\UTFviii@invalid@err\string %<2ekernel>\let\UTFviii@two@octets\string %<2ekernel>\let\UTFviii@three@octets\string %<2ekernel>\let\UTFviii@four@octets\string %<2ekernel>\everyjob\expandafter{\the\everyjob %<2ekernel>\let\UTFviii@undefined@err\UTFviii@undefined@err@@ %<2ekernel>\let\UTFviii@invalid@err\UTFviii@invalid@err@@ %<2ekernel>\let\UTFviii@two@octets\UTFviii@two@octets@@ %<2ekernel>\let\UTFviii@three@octets\UTFviii@three@octets@@ %<2ekernel>\let\UTFviii@four@octets\UTFviii@four@octets@@ %<2ekernel>} \let\@inpenc@test\@undefined \let\saved@space@catcode\@undefined % \end{macrocode} % % For formats not set up for UTF-8 default, set the C0 controls to catcode 15. % \begin{macrocode} \else \@tempcnta=0 \loop \catcode\@tempcnta=15 % \advance\@tempcnta\@ne % \ifnum\@tempcnta<32 % \repeat % \catcode0=15 % null \catcode9=10 % tab \catcode10=12 % ctrl J \catcode12=13 % ctrl L \catcode13=5 % newline % \end{macrocode} % % \begin{macrocode} \let\UseRawInputEncoding\relax % \end{macrocode} % % \begin{macrocode} \fi % %\EndIncludeInRelease %\IncludeInRelease{0000/00/00}% % {\UTFviii@invalid}{UTF-8 default}% % \end{macrocode} % % \begin{macrocode} %\@tempcnta=0 %\loop % \catcode\@tempcnta=15 % \advance\@tempcnta\@ne %\ifnum\@tempcnta<32 %\repeat % %\catcode9=10 % tab %\catcode10=12 % ctrl J %\catcode12=13 % ctrl L %\catcode13=5 % newline %\@tempcnta=128 %\loop %\catcode\@tempcnta=12 %\advance\@tempcnta\@ne %\ifnum\@tempcnta<256 %\repeat %\let\IeC\@undefined %\def\DeclareFontEncoding@#1#2#3{% % \expandafter % \ifx\csname T@#1\endcsname\relax % \def\cdp@elt{\noexpand\cdp@elt}% % \xdef\cdp@list{\cdp@list\cdp@elt{#1}% % {\default@family}{\default@series}% % {\default@shape}}% % \expandafter\let\csname#1-cmd\endcsname\@changed@cmd % \else % \@font@info{Redeclaring font encoding #1}% % \fi % \global\@namedef{T@#1}{#2}% % \global\@namedef{M@#1}{\default@M#3}% % \xdef\LastDeclaredEncoding{#1}% % } % \let\UseRawInputEncoding\@undefined % \let\DeclareFontEncoding@saved\@undefined % \let\inputencodingname\@undefined %\EndIncludeInRelease % \end{macrocode} % % \begin{macrocode} %<*2ekernel> % \begin{macrocode} % % We temporarily define |\reserved@a| to apply |\reserved@c| to all the % numbers in the range of its arguments. % \begin{macrocode} \def\reserved@a#1#2{% \@tempcnta#1\relax \@tempcntb#2\relax \reserved@b } \def\reserved@b{% \ifnum\@tempcnta>\@tempcntb\else \reserved@c\@tempcnta \advance\@tempcnta\@ne \expandafter\reserved@b \fi } % \end{macrocode} % \changes{v0.1e}{1994/05/02}{Added setting the special catcodes.} % \changes{v0.1f}{1994/05/02}{Set the catcode of control-J.} % Set the special catcodes (although some of these are useless, since an % error will have occurred if the catcodes have changed). Note that % |^^J| has catcode `other' for use in warning messages. % \begin{macrocode} \catcode`\ =10 \catcode`\#=6 \catcode`\$=3 \catcode`\%=14 \catcode`\&=4 \catcode`\\=0 \catcode`\^=7 \catcode`\_=8 \catcode`\{=1 \catcode`\}=2 \catcode`\~=13 \catcode`\@=11 \catcode`\^^I=10 \catcode`\^^J=12 \catcode`\^^L=13 \catcode`\^^M=5 % \end{macrocode} % \changes{v0.1e}{1994/05/02}{Added setting the `other' catcodes.} % Set the `other' catcodes. % \begin{macrocode} \def\reserved@c#1{\catcode#1=12\relax} \reserved@c{`\!} \reserved@c{`\"} \reserved@a{`\'}{`\?} \reserved@c{`\[} \reserved@c{`\]} \reserved@c{`\`} \reserved@c{`\|} % \end{macrocode} % \changes{v0.1e}{1994/05/02}{Added setting the `letter' catcodes.} % Set the `letter' catcodes. % \begin{macrocode} \def\reserved@c#1{\catcode#1=11\relax} \reserved@a{`\A}{`\Z} \reserved@a{`\a}{`\z} % \end{macrocode} % \changes{v0.1e}{1994/05/02}{Made slot 127 illegal} % \changes{v1.0n}{1994/11/18} % {re-allow slots 127--255} % All the characters in the range 0--31 and 127--255 are illegal, % \emph{except} tab (|^^I|), nl (|^^J|), ff (|^^L|) and cr (|^^M|). % % % \subsection{Lccodes and uccodes} % % \changes{v1.1b}{1998/05/20}{Set up uc/lccodes after loading % hyphenation files: pr/2639} % We now again set up the default (T1) uc/lccodes. % The lower case characters need their |\uccode| and |\lccode| values % set. Some of this is a repeat of the set-up before loading % hyphenation files. % Depending on the \TeX{} version, we might not be allowed to do % this for non-ASCII characters. % \changes{v1.0n}{1994/06/09}{For \TeX2, do not set codes for higher % half of character table.} % \changes{v2.0a}{2015/01/03}{Skip resetting codes with Unicode engines} % For the Unicode engines (Xe\TeX{} and Lua\TeX{}) there is no need to % do any of this: they use hyphenation data which does not alter any % of the set up and so this entire block is skipped. % \begin{macrocode} \ifnum 0% \ifx\Umathcode\@undefined\else 1\fi \ifx\XeTeXmathcode\@undefined\else 1\fi >\z@ \else \def\reserved@c#1{% \count@=#1\advance\count@ by -"20 \uccode#1=\count@ \lccode#1=#1 } \reserved@a{`\a}{`\z} \reserved@a{"A0}{"BC} \reserved@a{"E0}{"FF} % \end{macrocode} % The upper case characters need their |\uccode| and |\lccode| values % set, and their |\sfcode| set to 999. % \begin{macrocode} \def\reserved@c#1{% \count@=#1\advance\count@ by "20 \uccode#1=#1 \lccode#1=\count@ \sfcode#1=999 } \reserved@a{`\A}{`\Z} \reserved@a{"80}{"9C} \reserved@a{"C0}{"DF} % \end{macrocode} % Well, it would be nice if that were correct, but unfortunately, the % Cork encoding contains some odd slots whose uccode or lccode isn't % quite what you'd expect. % \begin{macrocode} \uccode`\^^Y=`\I % dotless i \lccode`\^^Y=`\^^Y % dotless i \uccode`\^^Z=`\J % dotless j, ae in OT1 \lccode`\^^Z=`\^^Z % dotless j, ae in OT1 \lccode`\^^9d=`\i % dotted I \uccode`\^^9d=`\^^9d % dotted I \lccode`\^^9e=`\^^9e % d-bar \uccode`\^^9e=`\^^d0 % d-bar % \end{macrocode} % Finally here is one that helps hyphenation in the OT1 encoding. % \changes{v1.0z}{1996/10/31} % {Added extra \cs{lcode}, hoping it does no harm in T1 (pr/1969)} % \begin{macrocode} \lccode`\^^[=`\^^[ % oe in OT1 \fi % End of reset block for 8-bit engines % \end{macrocode} % % \begin{macro}{\MakeUppercase} % \begin{macro}{\MakeUppercase} % \begin{macro}{\@uclclist} % % \changes{v1.1a}{1997/10/20}{Removed \cs{aa} and \cs{AA} from % \cs{@uclclist} as these are macros.} % % And whilst we're doing things with uc/lc tables, here are two % commands to upper- and lower-case a string. % % \emph{Note} that this implementation is subject to change! At % the moment we're not providing any way to extend the list of % uc/lc commands, since finding a good interface is difficult. % These commands have some nasty features, such as uppercasing % mathematics, environment names, labels, etc. A much better % long-term solution is to use all-caps fonts, but these aren't % generally available. % \begin{macrocode} \DeclareRobustCommand{\MakeUppercase}[1]{{% \def\i{I}\def\j{J}% \def\reserved@a##1##2{\let##1##2\reserved@a}% \expandafter\reserved@a\@uclclist\reserved@b{\reserved@b\@gobble}% \protected@edef\reserved@a{\uppercase{#1}}% \reserved@a }} \DeclareRobustCommand{\MakeLowercase}[1]{{% \def\reserved@a##1##2{\let##2##1\reserved@a}% \expandafter\reserved@a\@uclclist\reserved@b{\reserved@b\@gobble}% \protected@edef\reserved@a{\lowercase{#1}}% \reserved@a }} \def\@uclclist{\oe\OE\o\O\ae\AE \dh\DH\dj\DJ\l\L\ng\NG\ss\SS\th\TH} % \end{macrocode} % The above code works, but has the nasty side-effect that if you % say something like: %\begin{verbatim} % \markboth{\MakeUppercase\contentsname} % {\MakeUppercase\contentsname} %\end{verbatim} % then the uppercasing is only done to the first letter of the % contents name, since the mark expands out to: %\begin{verbatim} % \mark{\protect\MakeUppercase Table of Contents} % {\protect\MakeUppercase Table of Contents} %\end{verbatim} % In order to get round this, we redefine |\MakeUppercase| and % |\MakeLowercase| to grab their argument and brace it. This is a % very low-level hack, and is \emph{not} recommended practice! % This is an instance of a general problem that makes it unsafe to % grab arguments unbraced, and probably needs a more general % solution. For the moment though, this hack will do: % \begin{macrocode} \protected@edef\MakeUppercase#1{\MakeUppercase{#1}} \protected@edef\MakeLowercase#1{\MakeLowercase{#1}} % \end{macrocode} % \end{macro} % \end{macro} % \end{macro} % % \changes{v1.0h}{1994/05/13}{Added output enc stuff} % \changes{v1.0i}{1994/05/16}{moved output enc stuff to lfonts} % % \changes{v0.1a}{1994/03/07}{Add code from the old dump.dtx} % % \subsection{Applying Patch files} % Between major releases, small patches will be distributed in % files |ltpatch.ltx| which must be added at this point. % \changes{v1.0m}{1994/06/08}{Add patch file system} % \changes{v2.0h}{2015/06/23} % {set \cs{patch@level} in ltvers rather than in ltfinal/ltpatch} % % Patch file code removed. % \begin{macrocode} %\IfFileExists{ltpatch.ltx} % {\typeout{=================================^^J% % Applying patch file ltpatch.ltx^^J% % =================================} % \def\fmtversion@topatch{unknown} % \input{ltpatch.ltx} % \ifx\fmtversion\fmtversion@topatch % \ifx\patch@level\@undefined % \typeout{^^J^^J^^J% % !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!^^J% % !! Patch file `ltpatch.ltx' not suitable for this^^J% % !! version of LaTeX.^^J^^J% % !! Please check if initex found an old patch file:^^J% % !! --- if so, rename it or delete it, and redo the^^J% % !! initex run.^^J% % !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!^^J}% % \batchmode \@@end % \else % \end{macrocode} % \changes{v1.0q}{1995/04/21} % {Allow initial patch level 0} % \changes{v1.0t}{1995/06/13} % {Add patch level string more carefully} % The code below adds the `patch level' string to the first |\typeout| % in the startup banner. % \begin{macrocode} % \def\fmtversion@topatch{0}% % \ifx\fmtversion@topatch\patch@level\else % \def\reserved@a\typeout##1##2\reserved@a{% % \typeout{##1 patch level \patch@level}##2} % \everyjob\expandafter\expandafter\expandafter{% % \expandafter\reserved@a\the\everyjob\reserved@a} % \let\reserved@a\relax % \the\everyjob % \fi % \fi % \else % \typeout{^^J^^J^^J% % !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!^^J% % !! Patch file `ltpatch.ltx' (for version <\fmtversion@topatch>)^^J% % !! is not suitable for version <\fmtversion> of LaTeX.^^J^^J% % !! Please check if initex found an old patch file:^^J% % !! --- if so, rename it or delete it, and redo the^^J% % !! initex run.^^J% % !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!^^J}% % \batchmode \@@end % \fi % \let\fmtversion@topatch\relax % }{} % \end{macrocode} % % \subsection{Freeing Memory} % % \begin{macro}{\reserved@a} % \begin{macro}{\reserved@b} % \changes{v1.0v}{1995/10/17}{reset here after the \cs{input} above} % And just to make sure nobody relies on those definitions of % |\reserved@b| and friends. % These macros are reserved for use in the kernel. \emph{Do not use % them as general scratch macros}. % \begin{macrocode} \let\reserved@a\@filelist \let\reserved@b=\@undefined \let\reserved@c=\@undefined \let\reserved@d=\@undefined \let\reserved@e=\@undefined \let\reserved@f=\@undefined % \end{macrocode} % \end{macro} % \end{macro} % % \begin{macro}{\toks} % \changes{v1.0y}{1996/07/10} % {Free up memory from scratch registers /2213} % \begin{macrocode} \toks0{} \toks2{} \toks4{} \toks6{} \toks8{} % \end{macrocode} % \end{macro} % % \begin{macro}{\errhelp} % \changes{v0.1g}{1994/05/05}{Set error help empty.} % \changes{v1.1d}{2000/09/01}{Set error help empty at very end % (pr/449 done correctly).} % Empty the error help message, which may have some rubbish: % \begin{macrocode} \errhelp{} % \end{macrocode} % \end{macro} % % \subsection{Initialise file list} % % \begin{macro}{\@providesfile} % \changes{v1.0v}{1995/10/17}{reset macro} % Initialise for use in the document. During initex a modified version % has been used which leaves debugging information for |latexbug.tex|. % \begin{macrocode} \def\@providesfile#1[#2]{% \wlog{File: #1 #2}% \expandafter\xdef\csname ver@#1\endcsname{#2}% \endgroup} % \end{macrocode} % \end{macro} % % \begin{macro}{\@filelist} % \changes{v1.0w}{1995/10/19}{Move after \cs{reserved@a} setting:-)} % \begin{macro}{\@addtofilelist} % Reset |\@filelist| so files input while making the format are not % listed. The list built up so far may take up a lot of memory and so % it is moved to |\reserved@a| where it will be overwritten as soon % as almost any \LaTeX\ command is issued in a class file. % However the |latexbug.tex| program will be able to access this % information and insert it into a bug report. % \begin{macrocode} \let\@filelist\@gobble \def\@addtofilelist#1{\xdef\@filelist{\@filelist,#1}}% % \end{macrocode} % \end{macro} % \end{macro} % % \subsection{Dumping the format} % Finally we make |@| into a letter, ensure the format will % be in the `normal' error mode, and dump everything into the % format file. % \changes{v1.0t}{1995/06/13} % {Call \cs{errorstopmode}} % \begin{macrocode} \makeatother \errorstopmode \dump % % \end{macrocode} % % \Finale %