1
2
3
4
5
6
7
8
9
10
11
12
13
14\writestatus{loading}{ConTeXt Spacing Macros Passes}
15
16\registerctxluafile{spacpas}{autosuffix}
17
18
19
20
21
22\unprotect
23
24
25
26\integerdef\indecentparpassclasses\numexpr
27 \verylooseparpassclass
28 \looseparpassclass
29 \semilooseparpassclass
30
31 \semitightparpassclass
32 \tightparpassclass
33\relax
34
35\integerdef\almostdecentparpassclasses\numexpr
36 \verylooseparpassclass
37 \looseparpassclass
38
39
40
41 \tightparpassclass
42\relax
43
44\integerdef\looseparpassclasses\numexpr
45 \verylooseparpassclass
46 \looseparpassclass
47 \semilooseparpassclass
48\relax
49
50\integerdef\tightparpassclasses\numexpr
51 \semitightparpassclass
52 \tightparpassclass
53\relax
54
55\appendtoks
56 \ifcase\linebreakpasses\else
57 \linebreakpasses\zerocount
58 \pretolerance \plushundred
59 \tolerance \plustwohundred
60 \fi
61\to \everyforgetall
62
63\startsetups align:pass:none
64 \pretolerance \plushundred
65 \tolerance \plustwohundred
66 \parpasses \zerocount
67 \linebreakpasses\zerocount
68
69\stopsetups
70
71
72
73\lettonothing\currentalignpass
74
75\permanent\protected\def\setupalignpass[#1]
76 {\cdef\tempstring{align:pass:#1}
77 \ifx\tempstring\currentalignpass\else
78 \linebreakpasses\plusone
79 \let\currentalignpass\tempstring
80 \fastsetup\currentalignpass
81 \relax
82 \fi}
83
84\appendtoks
85 \ifcase\linebreakpasses\else
86 \fastsetup\currentalignpass
87 \fi
88\to \everybodyfont
89
90
91
92\permanent\protected\def\optionalword#1
93 {\removeunwantedspaces\wordboundary\discretionary{}{}{#1}}
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111\protect
112 |