| Current File : //usr/share/texlive/texmf-dist/tex/generic/infwarerr/infwarerr.sty |
%%
%% This is file `infwarerr.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% infwarerr.dtx (with options: `package')
%%
%% This is a generated file.
%%
%% Project: infwarerr
%% Version: 2019/12/03 v1.5
%%
%% Copyright (C)
%% 2007, 2010 Heiko Oberdiek
%% 2016-2019 Oberdiek Package Support Group
%%
%% This work 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. This version of this license is in
%% https://www.latex-project.org/lppl/lppl-1-3c.txt
%% and the latest version of this license is in
%% https://www.latex-project.org/lppl.txt
%% and version 1.3 or later is part of all distributions of
%% LaTeX version 2005/12/01 or later.
%%
%% This work has the LPPL maintenance status "maintained".
%%
%% The Current Maintainers of this work are
%% Heiko Oberdiek and the Oberdiek Package Support Group
%% https://github.com/ho-tex/infwarerr/issues
%%
%%
%% The Base Interpreter refers to any `TeX-Format',
%% because some files are installed in TDS:tex/generic//.
%%
%% This work consists of the main source file infwarerr.dtx
%% and the derived files
%% infwarerr.sty, infwarerr.pdf, infwarerr.ins, infwarerr.drv,
%% infwarerr-test1.tex, infwarerr-test2.tex,
%% infwarerr-test3.tex.
%%
\begingroup\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
\catcode35=6 % #
\catcode39=12 % '
\catcode44=12 % ,
\catcode45=12 % -
\catcode46=12 % .
\catcode58=12 % :
\catcode64=11 % @
\catcode123=1 % {
\catcode125=2 % }
\expandafter\let\expandafter\x\csname ver@infwarerr.sty\endcsname
\ifx\x\relax % plain-TeX, first loading
\else
\def\empty{}%
\ifx\x\empty % LaTeX, first loading,
% variable is initialized, but \ProvidesPackage not yet seen
\else
\expandafter\ifx\csname PackageInfo\endcsname\relax
\def\x#1#2{%
\immediate\write-1{Package #1 Info: #2.}%
}%
\else
\def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
\fi
\x{infwarerr}{The package is already loaded}%
\aftergroup\endinput
\fi
\fi
\endgroup%
\begingroup\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
\catcode35=6 % #
\catcode39=12 % '
\catcode40=12 % (
\catcode41=12 % )
\catcode44=12 % ,
\catcode45=12 % -
\catcode46=12 % .
\catcode47=12 % /
\catcode58=12 % :
\catcode64=11 % @
\catcode91=12 % [
\catcode93=12 % ]
\catcode123=1 % {
\catcode125=2 % }
\expandafter\ifx\csname ProvidesPackage\endcsname\relax
\def\x#1#2#3[#4]{\endgroup
\immediate\write-1{Package: #3 #4}%
\xdef#1{#4}%
}%
\else
\def\x#1#2[#3]{\endgroup
#2[{#3}]%
\ifx#1\@undefined
\xdef#1{#3}%
\fi
\ifx#1\relax
\xdef#1{#3}%
\fi
}%
\fi
\expandafter\x\csname ver@infwarerr.sty\endcsname
\ProvidesPackage{infwarerr}%
[2019/12/03 v1.5 Providing info/warning/error messages (HO)]%
\begingroup\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
\catcode123=1 % {
\catcode125=2 % }
\catcode64=11 % @
\def\x{\endgroup
\expandafter\edef\csname InfWarErr@AtEnd\endcsname{%
\endlinechar=\the\endlinechar\relax
\catcode13=\the\catcode13\relax
\catcode32=\the\catcode32\relax
\catcode35=\the\catcode35\relax
\catcode61=\the\catcode61\relax
\catcode64=\the\catcode64\relax
\catcode123=\the\catcode123\relax
\catcode125=\the\catcode125\relax
}%
}%
\x\catcode61\catcode48\catcode32=10\relax%
\catcode13=5 % ^^M
\endlinechar=13 %
\catcode35=6 % #
\catcode64=11 % @
\catcode123=1 % {
\catcode125=2 % }
\def\TMP@EnsureCode#1#2{%
\edef\InfWarErr@AtEnd{%
\InfWarErr@AtEnd
\catcode#1=\the\catcode#1\relax
}%
\catcode#1=#2\relax
}
\TMP@EnsureCode{10}{12}% ^^J
\TMP@EnsureCode{39}{12}% '
\TMP@EnsureCode{40}{12}% (
\TMP@EnsureCode{41}{12}% )
\TMP@EnsureCode{44}{12}% ,
\TMP@EnsureCode{45}{12}% -
\TMP@EnsureCode{46}{12}% .
\TMP@EnsureCode{58}{12}% :
\TMP@EnsureCode{60}{12}% <
\TMP@EnsureCode{62}{12}% >
\TMP@EnsureCode{94}{7}% ^
\edef\InfWarErr@AtEnd{\InfWarErr@AtEnd\noexpand\endinput}
\begingroup
\let\x=Y%
\def\check#1{%
\@check{Generic}{#1}%
\@check{Package}{#1}%
\@check{Class}{#1}%
}%
\def\@check#1#2{%
\expandafter\ifx\csname #1#2\endcsname\relax
\let\x=N%
\fi
}%
\check{Info}%
\check{Warning}%
\check{Error}%
\@check{Package}{WarningNoLine}%
\@check{Class}{WarningNoLine}%
\@check{}{@ehc}%
\@check{}{@ehd}%
\expandafter\endgroup
\ifx\x Y%
\let\@PackageInfo\PackageInfo
\def\@PackageInfoNoLine#1#2{%
\PackageInfo{#1}{#2\@gobble}%
}%
\let\@ClassInfo\ClassInfo
\def\@ClassInfoNoLine#1#2{%
\ClassInfo{#1}{#2\@gobble}%
}%
\let\@PackageWarning\PackageWarning
\let\@PackageWarningNoLine\PackageWarningNoLine
\let\@ClassWarning\ClassWarning
\let\@ClassWarningNoLine\ClassWarningNoLine
\let\@PackageError\PackageError
\let\@ClassError\ClassError
\expandafter\InfWarErr@AtEnd
\fi%
\begingroup\expandafter\endgroup
\ifcase\expandafter\ifx\csname inputlineno\endcsname\relax
0 %
\else
\ifnum\inputlineno<0 %
0 %
\else
1 %
\fi
\fi
\def\InfWarErr@online{}%
\else
\def\InfWarErr@online{ on input line \the\inputlineno}%
\fi
\begingroup\expandafter\expandafter\expandafter\endgroup
\expandafter\ifx\csname protected\endcsname\relax
\def\InfWarErr@protected{}%
\else
\let\InfWarErr@protected\protected
\fi
\chardef\InfWarErr@unused=16 %
\def\InfWarErr@ehc{%
Try typing \space <return> \space to proceed.\MessageBreak
If that doesn't work, type \space X <return> \space to quit.%
}
\def\InfWarErr@ehd{%
You're in trouble here. \space\@ehc
}
\InfWarErr@protected\def\InfWarErr@GenericInfo#1#2{%
\begingroup
\let\on@line\InfWarErr@online
\long\def\@gobble##1{}%
\def\space{ }%
\def\@spaces{\space\space\space\space}%
\def\MessageBreak{^^J#1}%
\newlinechar=10 %
\escapechar=92 %
\immediate\write-1{#2\on@line.}%
\endgroup
}
\InfWarErr@protected\def\InfWarErr@GenericWarning#1#2{%
\begingroup
\let\on@line\InfWarErr@online
\long\def\@gobble##1{}%
\def\space{ }%
\def\@spaces{\space\space\space\space}%
\def\MessageBreak{^^J#1}%
\newlinechar=10 %
\escapechar=92 %
\immediate\write\InfWarErr@unused{^^J#2\on@line.^^J}%
\endgroup
}
\InfWarErr@protected\def\InfWarErr@GenericError#1#2#3#4{%
\begingroup
\immediate\write\InfWarErr@unused{}%
\def\space{ }%
\def\@spaces{\space\space\space\space}%
\let\@ehc\InfWarErr@ehc
\let\@ehd\InfWarErr@ehd
\let\on@line\InfWarErr@online
\def\MessageBreak{^^J}%
\newlinechar=10 %
\escapechar=92 %
\edef\InfWarErr@help{\noexpand\errhelp{#4}}%
\InfWarErr@help
\def\MessageBreak{^^J#1}%
\errmessage{%
#2.^^J^^J%
#3^^J%
Type \space H <return> \space for immediate help.^^J ...^^J%
}%
\endgroup
}
\def\@PackageInfo#1#2{%
\InfWarErr@GenericInfo{%
(#1) \@spaces\@spaces\@spaces
}{%
Package #1 Info: #2%
}%
}
\def\@PackageInfoNoLine#1#2{%
\@PackageInfo{#1}{#2\@gobble}%
}
\def\@ClassInfo#1#2{%
\InfWarErr@GenericInfo{%
(#1) \space\space\@spaces\@spaces
}{%
Class #1 Info: #2%
}%
}
\def\@ClassInfoNoLine#1#2{%
\@ClassInfo{#1}{#2\@gobble}%
}
\def\@PackageWarning#1#2{%
\InfWarErr@GenericWarning{%
(#1)\@spaces\@spaces\@spaces\@spaces
}{%
Package #1 Warning: #2%
}%
}
\def\@PackageWarningNoLine#1#2{%
\@PackageWarning{#1}{#2\@gobble}%
}
\def\@ClassWarning#1#2{%
\InfWarErr@GenericWarning{%
(#1) \space\@spaces\@spaces\@spaces
}{%
Class #1 Warning: #2%
}%
}
\def\@ClassWarningNoLine#1#2{%
\@ClassWarning{#1}{#2\@gobble}%
}
\def\@PackageError#1#2#3{%
\InfWarErr@GenericError{%
(#1)\@spaces\@spaces\@spaces\@spaces
}{%
Package #1 Error: #2%
}{%
See the #1 package documentation for explanation.%
}{#3}%
}
\def\@ClassError#1#2#3{%
\InfWarErr@GenericError{%
(#1) \space\@spaces\@spaces\@spaces
}{%
Class #1 Error: #2%
}{%
See the #1 class documentation for explanation.%
}{#3}%
}
\InfWarErr@AtEnd%
\endinput
%%
%% End of file `infwarerr.sty'.