summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/char-ini.tex
blob: be69f793ff6756b677dbebf564262dc53d784860 (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
%D \module
%D   [       file=char-ini,
%D        version=2006.08.20,
%D          title=\CONTEXT\ Character Macros,
%D       subtitle=Character Support (Initialization),
%D         author=Hans Hagen,
%D           date=\currentdate,
%D      copyright=PRAGMA]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

\writestatus{loading}{Character Support (initialization)}

\registerctxluafile{char-ini}{1.001}
\registerctxluafile{char-cmp}{1.001} % maybe we will load this someplace else
\registerctxluafile{char-tok}{1.001} % maybe we will load this someplace else

% \def\defchar
%   {\afterassignment\dodefchar\scratchcounter}

% \def\dodefchar
%   {\catcode\scratchcounter\active\relax
%    \ctxlua{tex.sprint("\\unexpanded\\def"..utf.char(\the\scratchcounter))}}

\def\utfchar#1{\ctxlua{tex.uprint(\number#1)}}

\endinput