diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-11 23:56:15 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-11 23:56:15 +0000 |
commit | a745346629ebfbb2e379cef8f87dfbabd2751932 (patch) | |
tree | 0f996162ea39b64a7be240cadcb944fbb43ff7ec /Master/texmf-dist/source/latex/polyglot/polyglot.ltx | |
parent | 5dd2e7b835f8b859f5f4cd144f6f20d8d4d50976 (diff) |
trunk/Master/texmf-dist/source/latex/polyglot
git-svn-id: svn://tug.org/texlive/trunk@454 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/latex/polyglot/polyglot.ltx')
-rw-r--r-- | Master/texmf-dist/source/latex/polyglot/polyglot.ltx | 87 |
1 files changed, 87 insertions, 0 deletions
diff --git a/Master/texmf-dist/source/latex/polyglot/polyglot.ltx b/Master/texmf-dist/source/latex/polyglot/polyglot.ltx new file mode 100644 index 00000000000..09a2c9e1a66 --- /dev/null +++ b/Master/texmf-dist/source/latex/polyglot/polyglot.ltx @@ -0,0 +1,87 @@ +%% +%% This is file `polyglot.ltx', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% polyglot.dtx (with options: `install') +%% +%% IMPORTANT NOTICE: +%% +%% For the copyright see the source file. +%% +%% Any modified versions of this file must be renamed +%% with new filenames distinct from polyglot.ltx. +%% +%% For distribution of the original source see the terms +%% for copying and modification in the file polyglot.dtx. +%% +%% This generated file may be distributed as long as the +%% original source files, as listed above, are part of the +%% same distribution. (The sources need not necessarily be +%% in the same archive or directory.) + +\def\fileversion{1.1} +\def\filedate{September 1, 1997} +\def\docdate{September 1, 1997} + +\count19=-1 % The language allocator + +\def\LanguagePath#1{\edef\input@path{\input@path{#1}}} + + +\def\PreLoadPatterns#1#2{% + \csname newlanguage\expandafter\endcsname\csname pgh@#1\endcsname + \language\csname pgh@#1\endcsname + \input{#2}} + +\def\SetPatterns#1#2{\expandafter\chardef + \csname pgh@#1\endcsname#2\relax} + +\def\PreLoadPolyGlot{% + \ifx\pg@add@to\@undefined\input{polyglot.def}\fi} + +\def\PreLoadLanguage#1{\PreLoadPolyGlot + \@ifnextchar[{\pg@load{#1}}{\pg@load{#1}[#1]}} + +\def\pg@load#1[#2]{\pg@input{#1}{#2}} + +\def\pg@@{pg-} + +\def\pg@input#1#2#3#4{% + \pg@to@list{#1}% + \@ifundefined{pgh@#1}% + {\expandafter\let\csname pgh@#1\expandafter\endcsname + \csname pgh@#3\endcsname% + \PackageInfo{polyglot}% + {#1 with #3 patterns\@gobble}}\@empty + \@ifundefined{\pg@@?#1}% + {\InputIfFileExists{#2.ld}{}% + {\pg@err{Missing language file}}% + \pg@extensions{#2}}\@empty + \edef\thelanguage{\csname\pg@@?#1\endcsname}#4} + +\def\LoadLanguage#1#2#{\@gobbletwo} + +\input{polyglot.cfg} + +\language\z@ + +\let\LanguagePath\@gobble + +\let\PreLoadPatterns\@gobbletwo + +\def\PreLoadLanguage#1{% + \@ifnextchar[{\pg@preld{#1}}{\pg@preld{#1}[#1]}} +\def\pg@preld#1[#2]#3#4{% + \DeclareOption{#1}{\@ifundefined{pge@#2}% + {\pg@extensions{#2}\@namedef{pge@#2}{}}\@empty}} + +\def\LoadLanguage#1{\@ifnextchar[{\pg@load{#1}}{\pg@load{#1}[#1]}} + +\def\pg@load#1[#2]#3#4{% + \DeclareOption{#1}{\pg@input{#1}{#2}{#3}{#4}}} + +\endinput +%% +%% End of file `polyglot.ltx'. |