• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1% xu-csaccents.tex
2% Define accent commands used in {cz|sk}hyphen.tex to map to Unicode characters
3% for use when loading hyphenation Czech & Slovak patterns in XeTeX
4% (NOT intended for other uses than pattern-loading)
5% Jonathan Kew, 2006-08-18
6% Public domain
7
8\def\BAD{\errmessage{Hyphenation file corrupted!}}
9
10\def\^#1{%
11  \ifx o#1^^f4\else
12  \BAD
13  \fi}%
14\def\`#1{%
15  \ifx a#1^^e0\else
16  \BAD
17  \fi}%
18\def\'#1{%
19  \ifx a#1^^e1\else
20  \ifx e#1^^e9\else
21  \ifx\i#1^^ed\else
22  \ifx i#1^^ed\else
23  \ifx o#1^^f3\else
24  \ifx u#1^^fa\else
25  \ifx y#1^^fd\else
26  \ifx r#1^^^^0155\else
27  \ifx l#1^^^^013a\else
28  \BAD
29  \fi\fi\fi\fi\fi\fi\fi\fi\fi}%
30\def\v#1{%
31  \ifx e#1^^^^011b\else
32  \ifx s#1^^^^0161\else
33  \ifx c#1^^^^010d\else
34  \ifx r#1^^^^0159\else
35  \ifx z#1^^^^017e\else
36  \ifx d#1^^^^010f\else
37  \ifx t#1^^^^0165\else
38  \ifx l#1^^^^013e\else
39  \ifx n#1^^^^0148\else
40  \BAD
41  \fi\fi\fi\fi\fi\fi\fi\fi\fi}%
42\def\"#1{%
43  \ifx a#1^^e4\else
44  \ifx o#1^^f6\else
45  \ifx u#1^^fc\else
46  \BAD
47  \fi\fi\fi}%
48\def\r#1{%
49  \ifx u#1^^^^016f\else
50  \BAD
51  \fi}%
52
53\endinput
54