• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1% xu-sihyph.tex
2% Wrapper for XeTeX to read sihyph.tex
3% Jonathan Kew, 2006-08-17
4% Public domain
5
6\begingroup
7
8\expandafter\ifx\csname XeTeXrevision\endcsname\relax
9\else
10
11  % Define the accent macro " to expand to the required Unicode characters
12  \catcode`\"=13
13  \def"#1{\ifx#1c^^^^010d\else \ifx#1s^^^^0161\else \ifx#1z^^^^017e\else
14      \errmessage{Hyphenation pattern file corrupted!}%
15    \fi\fi\fi}
16  \catcode`\"=12 % reset catcode so we can read \lccode etc in sihyph.tex
17
18  \let\PATTERNS=\patterns
19  \def\patterns{% at the \patterns command in sihyph.tex...
20    \endgroup % end group to discard definitions from sihyph
21    \begingroup % and start our own (to match \endgroup in sihyph)
22    \lefthyphenmin=2 \righthyphenmin=3 % settings from sihyph.tex
23    \catcode`\"=13 % activate our definition of " from above
24    \PATTERNS % and then load the real patterns
25  }
26
27\fi
28
29\input sihyph.tex
30
31\endgroup
32\endinput
33