blob: 2bd0e3638603e8618473812fb743f0f044ce86eb (
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
|
%%
%% This is file `cenccmn.tex',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% ucs.dtx (with options: `cenccmn.tex')
%%
%% Copyright 2001 Dominique Unruh <unruh@ut.ee>
%% Copyright 2013 Wolfgang Jeltsch <wolfgang@cs.ioc.ee>
%% Copyright 2022 David Carlisle https://github.com/LaTeX-Package-Repositories/ucs
%%
%% This program is provided under the terms of the LaTeX Project Public License with some
%% modifications. See the file LICENSE for information.
%%
\ProvidesFile{cenccmn.tex}[2001/10/25
Macros common to fontencodings C00, C40, C61]%
\def\CJK@@empty#1{%
\ifx\CJK@plane\undefined\def\mandatory@arg{cmr10}\else
\edef\mandatory@arg{\mandatory@arg\CJK@plane}\fi%
\empty@sfcnt#1%
\xdef\font@name{\csname \curr@fontshape/\f@size/%
\ifx\CJK@plane\undefined\else\CJK@plane\fi\endcsname}}
\def\CJK@@sub#1{%
\expandafter\ifx\csname CJK@\mandatory@arg/\f@size\endcsname\relax
\expandafter\gdef\csname CJK@\mandatory@arg/\f@size\endcsname{}%
\sub@sfcnt#1%
\else
\sub@sfcnt\@gobble
\fi}
\def\CJK@DNPgen{%
\ifx\CJK@plane\undefined\def\external@font{cmr10}\else
\edef\external@font{%
\mandatory@arg\CJK@plane\f@size}\fi
\xdef\font@name{%
\csname \curr@fontshape/\f@size/%
\ifx\CJK@plane\undefined\else\CJK@plane\fi\endcsname}}%
\def\CJK@DNP{%
\ifx\CJK@plane\undefined\def\external@font{cmr10}\else
\@tempdimb \f@size\p@
\edef\external@font{%
\mandatory@arg\CJK@plane\optional@arg\space at \the\@tempdimb}\fi
\xdef\font@name{%
\csname \curr@fontshape/\f@size/%
\ifx\CJK@plane\undefined\else\CJK@plane\fi\endcsname\endcsname}}
\DeclareSizeFunction{CJK}{\CJK@@empty\@font@warning}
\DeclareSizeFunction{CJKb}{\CJK@@empty\@font@warning}
\DeclareSizeFunction{sCJK}{\CJK@@empty\@font@info}
\DeclareSizeFunction{sCJKb}{\CJK@@empty\@font@info}
\DeclareSizeFunction{CJKsub}{\CJK@@sub\@font@warning}
\DeclareSizeFunction{CJKssub}{\CJK@@sub\@font@info}
\DeclareSizeFunction{DNPgen}{\CJK@DNPgen}
\DeclareSizeFunction{DNPgenb}{\CJK@DNPgen}
\DeclareSizeFunction{DNP}{\CJK@DNP}
\DeclareSizeFunction{DNPb}{\CJK@DNP}
\@ifpackageloaded{CJK}{}{%
\AtBeginDocument{%
\@ifpackageloaded{CJK}{%
\PackageError{fontenc C??}{Load fontencoding C00/C40/... after CJK}{%
Otherwise strange things may happen, when you use those encodings}}{}}}
\def\CJKresetplane{\let\CJK@plane\undefined}
%%% Local Variables:
%%% mode: latex
%%% coding: utf-8
%%% TeX-master: "../test.tex"
%%% End:
%%% Local IspellDict: british
|
