You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
327 lines
8.6 KiB
327 lines
8.6 KiB
%%
|
|
%% This is file `iflang.sty',
|
|
%% generated with the docstrip utility.
|
|
%%
|
|
%% The original source files were:
|
|
%%
|
|
%% iflang.dtx (with options: `package')
|
|
%%
|
|
%% This is a generated file.
|
|
%%
|
|
%% Project: iflang
|
|
%% Version: 2018/01/21 v1.7
|
|
%%
|
|
%% Copyright (C)
|
|
%% 2007 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/oberdiek/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 iflang.dtx
|
|
%% and the derived files
|
|
%% iflang.sty, iflang.pdf, iflang.ins, iflang.drv, iflang-test1.tex,
|
|
%% iflang-test2.tex, iflang-test3.tex, iflang-test4.tex,
|
|
%% iflang-test5.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@iflang.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{iflang}{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@iflang.sty\endcsname
|
|
\ProvidesPackage{iflang}%
|
|
[2018/01/21 v1.7 Checks for the current language (HO)]%
|
|
\begingroup\catcode61\catcode48\catcode32=10\relax%
|
|
\catcode13=5 % ^^M
|
|
\endlinechar=13 %
|
|
\catcode123=1 % {
|
|
\catcode125=2 % }
|
|
\catcode64=11 % @
|
|
\def\x{\endgroup
|
|
\expandafter\edef\csname IfLang@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\IfLang@AtEnd{%
|
|
\IfLang@AtEnd
|
|
\catcode#1=\the\catcode#1\relax
|
|
}%
|
|
\catcode#1=#2\relax
|
|
}
|
|
\TMP@EnsureCode{39}{12}% '
|
|
\TMP@EnsureCode{40}{12}% (
|
|
\TMP@EnsureCode{41}{12}% )
|
|
\TMP@EnsureCode{44}{12}% ,
|
|
\TMP@EnsureCode{46}{12}% .
|
|
\TMP@EnsureCode{47}{12}% /
|
|
\TMP@EnsureCode{58}{12}% :
|
|
\TMP@EnsureCode{91}{12}% [
|
|
\TMP@EnsureCode{93}{12}% ]
|
|
\edef\IfLang@AtEnd{\IfLang@AtEnd\noexpand\endinput}
|
|
\expandafter\ifx\csname @firstoftwo\endcsname\relax
|
|
\long\def\@firstoftwo#1#2{#1}%
|
|
\fi
|
|
\expandafter\ifx\csname @secondoftwo\endcsname\relax
|
|
\long\def\@secondoftwo#1#2{#2}%
|
|
\fi
|
|
\begingroup\expandafter\expandafter\expandafter\endgroup
|
|
\expandafter\ifx\csname ifcsname\endcsname\relax
|
|
\expandafter\@firstoftwo
|
|
\else
|
|
\expandafter\@secondoftwo
|
|
\fi
|
|
{%
|
|
\def\IfLang@IfDefined#1{%
|
|
\expandafter\ifx\csname#1\endcsname\relax
|
|
\expandafter\@secondoftwo
|
|
\else
|
|
\expandafter\@firstoftwo
|
|
\fi
|
|
}%
|
|
}{%
|
|
\def\IfLang@IfDefined#1{%
|
|
\ifnum\ifcsname#1\endcsname
|
|
\expandafter\ifx\csname#1\endcsname\relax
|
|
1%
|
|
\else
|
|
0%
|
|
\fi
|
|
\else
|
|
1%
|
|
\fi
|
|
=0 %
|
|
\expandafter\@firstoftwo
|
|
\else
|
|
\expandafter\@secondoftwo
|
|
\fi
|
|
}%
|
|
}
|
|
\begingroup\expandafter\expandafter\expandafter\endgroup
|
|
\expandafter\ifx\csname RequirePackage\endcsname\relax
|
|
\input infwarerr.sty\relax
|
|
\input pdftexcmds.sty\relax
|
|
\else
|
|
\RequirePackage{infwarerr}[2007/09/09]%
|
|
\RequirePackage{pdftexcmds}[2016/05/16]%
|
|
\fi
|
|
\begingroup\expandafter\expandafter\expandafter\endgroup
|
|
\expandafter\ifx\csname et@xpatterns\endcsname\relax
|
|
\@PackageInfoNoLine{iflang}{%
|
|
Naming convention for patterns: babel%
|
|
}%
|
|
\def\IfLang@prefix{l@}%
|
|
\else
|
|
\@PackageInfoNoLine{iflang}{%
|
|
Naming convention for patterns: etex.src%
|
|
}%
|
|
\def\IfLang@prefix{lang@}%
|
|
\let\IfLang@OrgUseLanguage\uselanguage
|
|
\def\uselanguage#1{%
|
|
\edef\languagename{#1}%
|
|
\IfLang@OrgUseLanguage{#1}%
|
|
}%
|
|
\begingroup\expandafter\expandafter\expandafter\endgroup
|
|
\expandafter\ifx\csname languagename\endcsname\relax
|
|
\begingroup\expandafter\expandafter\expandafter\endgroup
|
|
\expandafter\ifx\csname lang@USenglish\endcsname\relax
|
|
\@PackageWarningNoLine{iflang}{%
|
|
\string\lang@USenglish\space is missing%
|
|
}%
|
|
\else
|
|
\ifnum\lang@USenglish=\language
|
|
\def\languagename{USenglish}%
|
|
\else
|
|
\@PackageWarningNoLine{iflang}{%
|
|
\string\languagename\space is not set,\MessageBreak
|
|
current language is unknown%
|
|
}%
|
|
\fi
|
|
\fi
|
|
\fi
|
|
\fi
|
|
\begingroup\expandafter\expandafter\expandafter\endgroup
|
|
\expandafter\ifx\csname languagename\endcsname\relax
|
|
\@PackageInfoNoLine{iflang}{%
|
|
\string\languagename\space is not set%
|
|
}%
|
|
\fi
|
|
\def\IfLanguagePatterns#1{%
|
|
\ifnum\IfLang@IfDefined{\IfLang@prefix#1}{%
|
|
\ifnum\csname\IfLang@prefix#1\endcsname=\language
|
|
0%
|
|
\else
|
|
1%
|
|
\fi
|
|
}{1}=0 %
|
|
\expandafter\@firstoftwo
|
|
\else
|
|
\expandafter\@secondoftwo
|
|
\fi
|
|
}
|
|
\begingroup\expandafter\expandafter\expandafter\endgroup
|
|
\expandafter\ifx\csname pdf@strcmp\endcsname\relax
|
|
\expandafter\@firstoftwo
|
|
\else
|
|
\expandafter\@secondoftwo
|
|
\fi
|
|
{%
|
|
\def\IfLang@StrNil{\relax}%
|
|
\def\IfLang@StrEqual#1{%
|
|
\number\IfLang@StrEqualStart{}{}#1\IfLang@StrNil
|
|
}%
|
|
\def\IfLang@StrEqualStart#1#2#3{%
|
|
\ifx#3\IfLang@StrNil
|
|
\IfLang@StrEqualStop
|
|
\fi
|
|
\ifcat\noexpand#3\relax
|
|
\IfLang@StrExpand{#1}{#2}#3%
|
|
\fi
|
|
\IfLang@StrEqualStart{\if#3#1}{#2\fi}%
|
|
}%
|
|
\def\IfLang@StrEqualStop\fi#1\IfLang@StrEqualStart#2#3#4{%
|
|
\fi
|
|
#2#4\relax'#313 %
|
|
}%
|
|
\def\IfLang@StrExpand#1#2#3\fi\IfLang@StrEqualStart#4#5{%
|
|
\fi
|
|
\IfLang@@StrExpand{#1}{#2}#3%
|
|
}%
|
|
\def\IfLang@@StrExpand#1#2#3\IfLang@StrNil{%
|
|
\expandafter\IfLang@@@StrExpand#3\IfLang@StrNil{#1}{#2}%
|
|
}%
|
|
\def\IfLang@@@StrExpand#1\IfLang@StrNil#2#3{%
|
|
\IfLang@StrEqualStart{#2}{#3}#1\IfLang@StrNil
|
|
}%
|
|
\def\IfLanguageName#1{%
|
|
\ifnum\IfLang@IfDefined{languagename}{%
|
|
\if\expandafter\IfLang@StrEqual\expandafter%
|
|
{\languagename}{#1}%
|
|
0%
|
|
\else
|
|
1%
|
|
\fi
|
|
}{1}=0 %
|
|
\expandafter\@firstoftwo
|
|
\else
|
|
\expandafter\@secondoftwo
|
|
\fi
|
|
}%
|
|
}{%
|
|
\def\IfLanguageName#1{%
|
|
\ifnum\IfLang@IfDefined{languagename}{%
|
|
\pdf@strcmp{#1}{\languagename}%
|
|
}{1}=0 %
|
|
\expandafter\@firstoftwo
|
|
\else
|
|
\expandafter\@secondoftwo
|
|
\fi
|
|
}%
|
|
}
|
|
\begingroup\expandafter\expandafter\expandafter\endgroup
|
|
\expandafter\ifx\csname languagename\endcsname\relax
|
|
\else
|
|
\IfLanguagePatterns{\languagename}{}{%
|
|
\@PackageWarningNoLine{iflang}{%
|
|
Mismatch between \string\language\space
|
|
(patterns)\MessageBreak
|
|
and setting of \string\languagename
|
|
}%
|
|
}%
|
|
\fi
|
|
\IfLang@AtEnd%
|
|
%% \section{Installation}
|
|
\endinput
|
|
%%
|
|
%% End of file `iflang.sty'.
|
|
|