home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fresh Fonts 1
/
freshfonts1.bin
/
programs
/
amiga
/
pastex
/
macros
/
latex2e
/
base
/
lthyphen.cfg
< prev
next >
Wrap
Text File
|
1994-06-09
|
7KB
|
188 lines
%%
%% This is file `lthyphen.cfg', generated
%% on <1994/6/9> with the docstrip utility (2.0r).
%%
%% The original source files were:
%%
%% babel.dtx (with options: `kernel,patterns')
%%
%% Copyright (C) 1989-1994 by Johannes Braams
%% All rights reserved.
%% For additional copyright information see further down in this file.
%%
%% This file is part of the Babel system, release 3.4
%% --------------------------------------------------
%%
%% This file is distributed in the hope that it will be useful,
%% but WITHOUT ANY WARRANTY; without even the implied warranty of
%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
%%
%%
%% IMPORTANT NOTICE:
%%
%% For error reports in case of UNCHANGED versions see readme file.
%%
%% Please do not request updates from me directly. Distribution is
%% done through Mail-Servers and TeX organizations.
%%
%% You are not allowed to change this file.
%%
%% You are allowed to distribute this file under the condition that
%% it is distributed together with all files mentioned in manifest.txt.
%%
%% If you receive only some of these files from someone, complain!
%%
%% You are NOT ALLOWED to distribute this file alone. You are NOT
%% ALLOWED to take money for the distribution or use of either this
%% file or a changed version, except for a nominal charge for copying
%% etc.
%%%\iffalse
%%% @LaTeX-file{
%%% author = "Johannes L. Braams",
%%% version = "3.4d",
%%% date = "05 June 1994",
%%% time = "14:09:50 MET",
%%% filename = "babel.dtx",
%%% address = "PTT Research
%%% St. Paulusstraat 4
%%% 2264 XZ Leidschendam
%%% The Netherlands",
%%% telephone = "(70) 3325051",
%%% FAX = "(70) 3326477",
%%% checksum = "49524 2026 9500 78244",
%%% email = "J.L.Braams@research.ptt.nl (Internet)",
%%% codetable = "ISO/ASCII",
%%% keywords = "babel",
%%% supported = "yes",
%%% docstring = "This file, babel.dtx contains the core of
%%% the babel system as it was described in
%%% TuGboat Volume 12 no 2 and Volume 14 no 1.
%%%
%%% The checksum field above contains a CRC-16
%%% checksum as the first value, followed by the
%%% equivalent of the standard UNIX wc (word
%%% count) utility output of lines, words, and
%%% characters. This is produced by Robert
%%% Solovay's checksum utility.",
%%% }
%%% \fi
%%
\def\fileversion{v3.4d}
\def\filedate{1994/06/05}
%% Copyright (C) 1989-1994 by Johannes Braams,
%% PTT Research Neher Laboratories
%% all rights reserved.
%% Please report errors to: J.L. Braams
%% J.L.Braams@research.ptt.nl
\ProvidesFile{lthyphen.cfg}[\filedate\space\fileversion\space
Babel language switching mechanism]
\ifx\language\undefined
\csname newcount\endcsname\language
\fi
\ifx\newlanguage\undefined
\csname newcount\endcsname\last@language
\else
\countdef\last@language=19
\fi
\ifx\newlanguage\undefined
\def\addlanguage#1{%
\global\advance\last@language \@ne
\ifnum\last@language<\@cclvi
\else
\errmessage{No room for a new \string\language!}%
\fi
\global\chardef#1\last@language
\wlog{\string#1 = \string\language\the\last@language}}
\else
\def\addlanguage{\alloc@9\language\chardef\@cclvi}
\fi
\def\adddialect#1#2{%
\global\chardef#1#2\relax
\wlog{\string#1 = a dialect from \string\language#2}}
\def\iflanguage#1#2#3{%
\expandafter\ifx\csname l@#1\endcsname\relax
\@nolanerr{#1}%
\else
\ifnum\csname l@#1\endcsname=\language #2%
\else#3\fi
\fi}
\def\selectlanguage#1{\protect\p@selectlanguage{%
\ifnum\escapechar=\expandafter`\string#1\empty
\else \string#1\empty\fi}}
\ifx\undefined\protect\let\protect\relax\fi
\def\p@selectlanguage#1{\relax
\expandafter\ifx\csname l@#1\endcsname\relax
\@nolanerr{#1}%
\else
\language=\csname l@#1\endcsname\relax
\originalTeX
\edef\languagename{#1}%
\expandafter\def\expandafter\originalTeX
\expandafter{\csname noextras#1\endcsname
\let\originalTeX\empty}%
\babel@beginsave
\csname captions#1\endcsname
\csname date#1\endcsname
\csname extras#1\endcsname\relax
\fi}%
\ifx\undefined\originalTeX\let\originalTeX\empty\fi
\ifx\undefined\babel@beginsave\let\babel@beginsave\relax\fi
\def\@nolanerr#1{%
\errhelp{Your command will be ignored, type <return> to proceed}%
\errmessage{You haven't defined the language #1\space yet}}
\newtoks\patterns@loaded \global\patterns@loaded={}
\def\process@language#1 #2 {%
\expandafter\addlanguage\csname l@#1\endcsname
\expandafter\language\csname l@#1\endcsname
\global\patterns@loaded\expandafter{\the\patterns@loaded#1, }%
\input #2}
\openin1 = language.dat
\ifeof1
\message{I couldn't find the file language.dat,\space
I will try the file hyphen.tex}
\input hyphen.tex\relax
\else
\last@language=-1
\loop
\endlinechar=-1
\read1 to \@line
\endlinechar`\^^M
\ifx\@line\empty
\else
\expandafter\expandafter\expandafter
\process@language\expandafter\@line\space
\fi
\iftrue \csname fi\endcsname
\csname if\ifeof1 false\else true\fi\endcsname
\repeat
\language=0
\fi
\closein1
\let\process@language=\undefined
\let\orig@dump=\dump
\def\dump{%
\everyjob\expandafter{\the\everyjob%
\immediate\write16{Hyphenation patterns for \the\patterns@loaded
loaded.}}%
\let\dump\orig@dump\let\orig@dump\undefined\dump}
%%\languagespecific{russian.dtx}
%%
%% \CharacterTable
%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
%% Digits \0\1\2\3\4\5\6\7\8\9
%% Exclamation \! Double quote \" Hash (number) \#
%% Dollar \$ Percent \% Ampersand \&
%% Acute accent \' Left paren \( Right paren \)
%% Asterisk \* Plus \+ Comma \,
%% Minus \- Point \. Solidus \/
%% Colon \: Semicolon \; Less than \<
%% Equals \= Greater than \> Question mark \?
%% Commercial at \@ Left bracket \[ Backslash \\
%% Right bracket \] Circumflex \^ Underscore \_
%% Grave accent \` Left brace \{ Vertical bar \|
%% Right brace \} Tilde \~}
\endinput
%%
%% End of file `lthyphen.cfg'.