1
2
3
4
5
6
7
8
9
10
11
12
13
14\writestatus{loading}{ConTeXt Typesetting Macros Digits}
15
16\unprotect
17
18\registerctxluafile{typodig}{autosuffix}
19
20\definesystemattribute[digits][public]
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41\permanent\protected\def\setdigitsmanipulation[#1]
42 {\clf_setdigitsmanipulation{#1}}
43
44\permanent\protected\def\resetdigitsmanipulation
45 {\c_attr_digits\attributeunsetvalue}
46
47\appendtoks
48 \resetdigitsmanipulation
49\to \everyresettypesetting
50
51\permanent\protected\def\equaldigits{\groupedcommand{\setdigitsmanipulation[1]}{}}
52\permanent\protected\def\dummydigit {\hphantom {\setdigitsmanipulation[1]0}}
53
54\appendtoks
55 \resetdigitsmanipulation
56\to \everyinitializeverbatim
57
58\protect \endinput
59 |