%% %% 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: 2007/11/11 v1.5 %% %% 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.3c of this license or (at your option) any later %% version. This version of this license is in %% http://www.latex-project.org/lppl/lppl-1-3c.txt %% and 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. %% %% 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}% [2007/11/11 v1.5 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}[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'.