%% %% 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. %% %% Copyright (C) 2007 by Heiko Oberdiek %% %% This work may be distributed and/or modified under the %% conditions of the LaTeX Project Public License, either %% version 1.3 of this license or (at your option) any later %% version. The latest version of this license is in %% http://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". %% %% This Current Maintainer of this work is Heiko Oberdiek. %% %% 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 \catcode44 12 % , \catcode45 12 % - \catcode46 12 % . \catcode58 12 % : \catcode64 11 % @ \expandafter\let\expandafter\x\csname ver@iflang.sty\endcsname \ifcase 0% \ifx\x\relax % plain \else \ifx\x\empty % LaTeX \else 1% \fi \fi \else \catcode35 6 % # \catcode123 1 % { \catcode125 2 % } \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}% \endgroup \expandafter\endinput \fi \endgroup \begingroup \catcode35 6 % # \catcode40 12 % ( \catcode41 12 % ) \catcode44 12 % , \catcode45 12 % - \catcode46 12 % . \catcode47 12 % / \catcode58 12 % : \catcode64 11 % @ \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\relax \xdef#1{#3}% \fi }% \fi \expandafter\x\csname ver@iflang.sty\endcsname \ProvidesPackage{iflang}% [2007/11/11 v1.5 Language checks (HO)] \begingroup \catcode123 1 % { \catcode125 2 % } \def\x{\endgroup \expandafter\edef\csname IfLang@AtEnd\endcsname{% \catcode35 \the\catcode35\relax \catcode64 \the\catcode64\relax \catcode123 \the\catcode123\relax \catcode125 \the\catcode125\relax }% }% \x \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{61}{12}% = \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}[2007/11/11]% \fi \begingroup\expandafter\expandafter\expandafter\endgroup \expandafter\ifx\csname uselanguage\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 \endinput %% %% End of file `iflang.sty'.