blob: 85bc82ddd79ee20204bc9ccd7491f59dc6b3a920 (
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
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
|
\ProvidesFile{gloss-french.ldf}[polyglossia: module for french]
\makeatletter
\def\french@font{\normalfontlatin}
\lccode"2019="2019
\ifx\l@french\@undefined%
\xpg@nopatterns{French}%
\adddialect\l@french0%
\fi
\def\french@punctuation{%
\frenchspacing%
\XeTeXinterchartokenstate=1%
\XeTeXcharclass `\! 7%
\XeTeXcharclass `\? 7%
\XeTeXcharclass `\; 7%
\XeTeXcharclass `\: 7%
\XeTeXinterchartoks 0 7 = {\unskip\kern.1667em}%
}
\def\nofrench@punctuation{%
\nonfrenchspacing%
\XeTeXinterchartokenstate=0%
}
\def\french@guillemets{%
\XeTeXinterchartokenstate=1%
\XeTeXcharclass `\« 8%
\XeTeXcharclass `\» 8%
\XeTeXinterchartoks 8 0 = {\kern.1667em}%
\XeTeXinterchartoks 0 8 = {\unskip\kern.1667em}%
\XeTeXinterchartoks 8 7 = {\unskip\kern.1667em}% "»;" -> "» ;"
\XeTeXinterchartoks 7 8 = {\unskip\kern.1667em}% "?»" -> "? »"
}
%\newcounter{niveauguillemets}[paragraph]
%
%\def\tmp@normal{normal}
%\def\tmp@paragraphe{paragraphe}
%\def\tmp@ligne{ligne}
%TODO
%\define@key{french}{guillemets}[normal]{
% \def\@tmpa{#1}
% \ifx\@tmpa\tmp@ligne%
% \def\french@guill@mets{% FIXME
% \def\LeftPointingDoubleAngleQuotationMark{«\kern.1667em\setcounter{niveauguillemets}{1}%
% \ifthenelse{\value{niveauguillemets} = 1}{\localleftbox{«\kern.1667em}}%
% {\everypar={{«}\kern.1667em}\setcounter{niveauguillemets}{1}}}%
% \def\RightPointingDoubleAngleQuotationMark{\unskip\kern.1667em»%
% \everypar={}\localleftbox{}}}%
% \else\ifx\@tmpa\tmp@paragraphe%
% \def\french@guill@mets{\def\LeftPointingDoubleAngleQuotationMark{«\kern.1667em%
% \everypar={«\kern.1667em}}\def\RightPointingDoubleAngleQuotationMark%
% {\unskip\kern.1667em»\everypar={}}}%
% \else\ifx\@tmpa\tmp@normal%
% \def\french@guill@mets{\def\LeftPointingDoubleAngleQuotationMark{«\kern.1667em}%
% \def\RightPointingDoubleAngleQuotationMark{\unskip\kern.1667em»}}%
%\fi\fi\fi}
%
%\def\tmp@sans{sansaccents}
%\define@key{french}{majuscules}{%
% \def\@tmpa{#1}%
% \ifx\@tmpa\tmp@sans%
% \addfontfeature{Mapping=sansaccents}% <<< TODO!
% \fi}
\def\captionsfrench{%
\def\refname{Références}%
\def\abstractname{Résumé}%
\def\bibname{Bibliographie}%
\def\prefacename{Préface}%
\def\chaptername{Chapitre}%
\def\appendixname{Annexe}%
\def\contentsname{Table des matières}%
\def\listfigurename{Table des figures}%
\def\listtablename{Liste des tableaux}%
\def\indexname{Index}%
\def\figurename{\scshape Fig.}%
\def\tablename{\scshape Tab.}%
\def\@Fpt{\ifcase\value{part}\or Première\or Deuxième\or%
Troisième\or Quatrième\or Cinquième\or Sixième\or%
Septième\or Huitième\or Neuvième\or Dixième\or Onzième\or%
Douzième\or Treizième\or Quatorzième\or Quinzième\or%
Seizième\or Dix-septième\or Dix-huitième\or Dix-neuvième\or%
Vingtième\fi\space}%
\def\thepart{}%
\def\partname{\protect\@Fpt partie}%
\def\pagename{page}%
\def\seename{\emph{voir}}%
\def\alsoname{\emph{voir aussi}}%
\def\enclname{P.~J. }%
\def\ccname{Copie à }%
\def\headtoname{}%
\def\proofname{Démonstration}%
}
\def\datefrench{%
\def\today{\ifx\ier\undefined\def\ier{er}\fi%
\ifnum\day=1\relax 1\ier%
\else \number\day\fi%
\space \ifcase\month%
\or janvier\or février\or mars\or avril\or mai\or juin\or%
juillet\or août\or septembre\or octobre\or novembre\or%
décembre\fi%
\space \number\year}}
\def\french@language{\protect\language=\l@french}
\setlocalhyphenmins{french}{2}{2}%
\def\noextras@french{%
\nofrench@punctuation%
\nofrench@indent}
\def\blockextras@french{%
\french@punctuation%
\french@indent%
\french@guillemets%
}
\def\inlineextras@french{%
\french@punctuation%
\french@guillemets%
}
\endinput
|