1 % dehypht-x-major-@DATE@.tex
3 % Copyright 2009, 2014 Werner Lemberg <wl@gnu.org>
4 % You may freely use, modify and/or distribute this file.
7 % Put the whole wrapper into a group (\patterns acts globally).
10 % Create local flag for checking UTF-8 support of non-pTeX engines.
11 % \newif must be defined outside any \ifx command.
12 \newif\if@dehyphx@UTF@
14 % Test for pTeX engine. pTeX needs explicit 8 bit patterns. We don't
15 % provide pTeX compatible patterns, yet. Therefore, don't load any
16 % patterns for pTeX. This strategy is necessary for pTeX format
18 \ifx\kanjiskip\undefined
19 % Non-pTeX engine. Test for UTF-8 aware engine.
20 \def\testengine#1#2!
{\def\secondarg{#2}}%
21 \testengine χ!
\relax % That's Chi, a 2-byte UTF-8 sequence
23 \message{dehyph-exptl: using a TeX engine with native UTF-
8 support.
}%
26 \message{dehyph-exptl: using an
8-bit TeX engine.
}%
31 % The word list used for generating German hyphenation patterns is
35 \ifx#1^^
9f^^ff
\else % ß - U+00DF - germandbls
36 \ifx#1^^a0^^e0
\else % à - U+00E0 - agrave
37 \ifx#1^^a1^^e1
\else % á - U+00E1 - aacute
38 \ifx#1^^a2^^e2
\else % â - U+00E2 - acircumflex
39 \ifx#1^^a3^^e3
\else % ã - U+00E3 - atilde
40 \ifx#1^^a4^^e4
\else % ä - U+00E4 - adieresis
41 \ifx#1^^a5^^e5
\else % å - U+00E5 - aring
42 \ifx#1^^a6^^e6
\else % æ - U+00E6 - ae
43 \ifx#1^^a7^^e7
\else % ç - U+00E7 - ccedilla
44 \ifx#1^^a8^^e8
\else % è - U+00E8 - egrave
46 \ifx#1^^a9^^e9
\else % é - U+00E9 - eacute
47 \ifx#1^^aa^^ea
\else % ê - U+00EA - ecircumflex
48 \ifx#1^^ab^^eb
\else % ë - U+00EB - edieresis
49 \ifx#1^^ac^^ec
\else % ì - U+00EC - igrave
50 \ifx#1^^ad^^ed
\else % í - U+00ED - iacute
51 \ifx#1^^ae^^ee
\else % î - U+00EE - icircumflex
52 \ifx#1^^af^^ef
\else % ï - U+00EF - idieresis
53 \ifx#1^^b0^^f0
\else % ð - U+00F0 - eth
54 \ifx#1^^b1^^f1
\else % ñ - U+00F1 - ntilde
55 \ifx#1^^b2^^f2
\else % ò - U+00F2 - ograve
57 \ifx#1^^b3^^f3
\else % ó - U+00F3 - oacute
58 \ifx#1^^b4^^f4
\else % ô - U+00F4 - ocircumflex
59 \ifx#1^^b5^^f5
\else % õ - U+00F5 - otilde
60 \ifx#1^^b6^^f6
\else % ö - U+00F6 - odieresis
61 \ifx#1^^b8^^f8
\else % ø - U+00F8 - oslash
62 \ifx#1^^b9^^f9
\else % ù - U+00F9 - ugrave
63 \ifx#1^^ba^^fa
\else % ú - U+00FA - uacute
64 \ifx#1^^bb^^fb
\else % û - U+00FB - ucircumflex
65 \ifx#1^^bc^^fc
\else % ü - U+00FC - udieresis
66 \ifx#1^^bd^^fd
\else % ý - U+00FD - yacute
68 \ifx#1^^be^^fe
\else % þ - U+00FE - thorn
69 \ifx#1^^bf^^b8
\else % ÿ - U+00FF - ydieresis
70 \errmessage{Hyphenation pattern file `dehypht-x-major-@DATE@.tex' corrupted!
}%
71 \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
72 \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
73 \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
78 \ifx#1^^a1^^b2
\else % š - U+0161 - scaron
79 \ifx#1^^be^^ba
\else % ž - U+017E - zcaron
80 \ifx#1^^
93^^f7
\else % œ - U+0163 - oe
81 \errmessage{Hyphenation pattern file `dehypht-x-major-@DATE@.tex' corrupted!
}%
84 \lccode"B2="B2
% š - U+0161 - scaron
85 \lccode"B8="B8
% ÿ - U+00FF - ydieresis
86 \lccode"BA="BA
% ž - U+017E - zcaron
87 \lccode"E0="E0
% à - U+00E0 - agrave
88 \lccode"E1="E1
% á - U+00E1 - aacute
89 \lccode"E2="E2
% â - U+00E2 - acircumflex
90 \lccode"E3="E3
% ã - U+00E3 - atilde
91 \lccode"E4="E4
% ä - U+00E4 - adieresis
92 \lccode"E5="E5
% å - U+00E5 - aring
93 \lccode"E6="E6
% æ - U+00E6 - ae
95 \lccode"E7="E7
% ç - U+00E7 - ccedilla
96 \lccode"E8="E8
% è - U+00E8 - egrave
97 \lccode"E9="E9
% é - U+00E9 - eacute
98 \lccode"EA="EA
% ê - U+00EA - ecircumflex
99 \lccode"EB="EB
% ë - U+00EB - edieresis
100 \lccode"EC="EC
% ì - U+00EC - igrave
101 \lccode"ED="ED
% í - U+00ED - iacute
102 \lccode"EE="EE
% î - U+00EE - icircumflex
103 \lccode"EF="EF
% ï - U+00EF - idieresis
104 \lccode"F0="F0
% ð - U+00F0 - eth
106 \lccode"F1="F1
% ñ - U+00F1 - ntilde
107 \lccode"F2="F2
% ò - U+00F2 - ograve
108 \lccode"F3="F3
% ó - U+00F3 - oacute
109 \lccode"F4="F4
% ô - U+00F4 - ocircumflex
110 \lccode"F5="F5
% õ - U+00F5 - otilde
111 \lccode"F6="F6
% ö - U+00F6 - odieresis
112 \lccode"F7="F7
% œ - U+0163 - oe
113 \lccode"F8="F8
% ø - U+00F8 - oslash
114 \lccode"F9="F9
% ù - U+00F9 - ugrave
115 \lccode"FA="FA
% ú - U+00FA - uacute
117 \lccode"FB="FB
% û - U+00FB - ucircumflex
118 \lccode"FC="FC
% ü - U+00FC - udieresis
119 \lccode"FD="FD
% ý - U+00FD - yacute
120 \lccode"FE="FE
% þ - U+00FE - thorn
121 \lccode"FF="FF
% ß - U+00DF - germandbls
124 \input dehypht-x-major-@DATE@.pat
126 % pTeX engine. Don't load any patterns.
127 \message{dehyph-exptl: pTeX engine detected. Experimental German
128 patterns not loaded!
}%