summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/plain/config/xetex.ini
blob: 692649730fa4719ae9e0114ff96d211909212b84 (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
% $Id$
% Public domain.  Originally by Jonathan Kew.

%% Disable the \font\preloaded=... entries from plain.tex
%% as xetex is primarily intended for use with other fonts
\catcode`\{=1 \catcode`\}=2 \catcode`\#=6 \catcode`\^=7 \catcode`\@=11

\scrollmode

\input unicode-letters

\let\s@vef@nt=\font
\let\preloaded=2
\def\font{\futurelet\next\d@ntpreload}
\def\d@ntpreload{\ifx\next\preloaded
   \let\next\sk@pf@nt
   \begingroup \catcode`\%=12 \catcode13=12
 \else
   \let\next\s@vef@nt
 \fi \next}
\lccode1=13
\lowercase{\def\sk@pf@nt\preloaded=#1^^A{\endgroup}}

\input etex.src

% restore the \font command and undefine other stuff
\catcode`\@=11
\let\font=\s@vef@nt
\let\d@ntpreload=\und@fined
\let\sk@pf@nt=\und@fined
\let\s@vef@nt=\und@fined

%
% Allocator for \XeTeXintercharclass values, from Enrico Gregorio 
%
\newcount\xe@alloc@intercharclass % allocates intercharclass
\xe@alloc@intercharclass=\thr@@ % from 4 (1,2 and 3 are used by CJK, AFAIK)
\def\xe@alloc@#1#2#3#4#5{\global\advance#1\@ne
 \xe@ch@ck#1#4#2% make sure there's still room
 \allocationnumber#1%
 \global#3#5\allocationnumber
 \wlog{\string#5=\string#2\the\allocationnumber}}
\def\xe@ch@ck#1#2#3{%
 \ifnum#1<#2\else
  \errmessage{No room for a new #3}%
 \fi}
\def\newXeTeXintercharclass{%
 \xe@alloc@\xe@alloc@intercharclass\XeTeXintercharclass\chardef\@cclv} %at most 254

\catcode`\@=12

\XeTeXuseglyphmetrics=1
\XeTeXdashbreakstate=1

\errorstopmode

\dump
\endinput