blob: 09a2c9e1a66d1debe5aebd527bb0c7a45e7955ae (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
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'.
|