summaryrefslogtreecommitdiff
path: root/Master/texmf-dist
diff options
context:
space:
mode:
authorJonathan Kew <jfkthame@googlemail.com>2006-09-27 12:26:26 +0000
committerJonathan Kew <jfkthame@googlemail.com>2006-09-27 12:26:26 +0000
commited4da49ce9d2ac16fdfa68e3a8b23196d55b536e (patch)
tree89e15ac6b266a850d9db7eee7219b73a705a5b6d /Master/texmf-dist
parente0b37bace0e55d811b0b155809b52f19aa4c3951 (diff)
xetex (unicode) wrapper for eohyph.tex
git-svn-id: svn://tug.org/texlive/trunk@2205 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist')
-rw-r--r--Master/texmf-dist/tex/generic/xu-hyphen/xu-eohyph.tex38
1 files changed, 38 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/xu-hyphen/xu-eohyph.tex b/Master/texmf-dist/tex/generic/xu-hyphen/xu-eohyph.tex
new file mode 100644
index 00000000000..9d643ce0986
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/xu-hyphen/xu-eohyph.tex
@@ -0,0 +1,38 @@
+% xu-eohyph.tex
+% Wrapper for XeTeX to read eohyph.tex
+% Jonathan Kew, 2006-09-26
+% Public domain
+
+\begingroup
+
+\expandafter\ifx\csname XeTeXrevision\endcsname\relax
+\else
+
+ % expand ^letter to Unicode character
+ \def\E{\errmessage{Esperanto hyphenation pattern file is corrupted}}
+ \catcode`\!=7 % use !!xy instead of ^^xy
+ \catcode`\^=13 % for Esperanto's diacritics
+ \def^#1{\ifx#1c!!!!0109\else \ifx#1g!!!!011d%
+ \else \ifx#1h!!!!0125\else \ifx#1j!!!!0135%
+ \else \ifx#1s!!!!015d\else \ifx#1u!!!!016d%
+ \else \E \fi\fi\fi\fi\fi\fi
+ }
+
+ % inflection macros copied from eohyph.tex
+ \def\adj#1{#1a. #1aj. #1ajn. #1an. #1e.}
+ \edef\nom#1{\adj{#1} #1o. #1oj. #1ojn. #1on.}
+ \def\ver#1{#1as. #1i. #1is. #1os. #1u. #1us.}
+
+ \let\PATTERNS=\patterns
+ \def\patterns{% at the \patterns command...
+ \endgroup % forget the definitions from eohyph.tex
+ \begingroup % new group to match \endgroup in eohyph.tex
+ \PATTERNS % and then load the real patterns
+ }
+
+\fi
+
+\input eohyph.tex
+
+\endgroup
+\endinput