summaryrefslogtreecommitdiff
path: root/obsolete/macros/inrstex/inrstex/masthyph.tex
blob: c5139c037aa2ffead41b859aa8b4d1897ddddc55 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
%-*-tex-*-
% Copyright Michael J. Ferguson, INRS-Telecommunications
% All rights reserved. 

% ======== Master Multilingual Pattern Inputs ======

% This file defines the changes in the \lccodes needed for Multilingual TeX
% and then inputs the patterns for English and French. 

% =========== Special lccodes and hyphenation for Bilingual Version ====


\gdef\accenthyphcodes{
\def\oe{^^[} % \oe 
\def\i{^^P}
\def\'##1{\csname @ac@##1\endcsname}
\def\`##1{\csname @gr@##1\endcsname}
\def\v##1{\csname @v@##1\endcsname}
\let\^^_=\v
\def\u##1{\csname  @u@##1\endcsname}
\let\^^S=\u
\def\=##1{\csname @eq@##1\endcsname}
\def\^##1{\csname @hat@##1\endcsname}
\let\^^D=\^
\def\.##1{\csname @dot@##1\endcsname}
\def\H##1{\csname @H@##1\endcsname}
\def\~##1{\csname @til@##1\endcsname}
\def\"##1{\csname @um@##1\endcsname}
\let\c@@=\c
\def\c##1{\csname c@##1\endcsname}
}

\gdef\spechyphcodes{}



% ======== Pattern Input / English and French ======

% english hyphenation patterns
\begingroup  
\language=0
\input enhyph \relax
\endgroup

% french hyphenation patterns
\begingroup
\language=1
\input frhyph \relax
\endgroup

% english hyphenation exceptions
\begingroup
\language=0
\input enhyphex \relax
\endgroup

% ======= definitions for fast eng/fr hyphenation =====
\def\ehyph{\language=0 \lccode`\'=0 \nonfrenchspacing}
\def\fhyph{\language=1 \lccode`\'=`\'\frenchspacing}