1
2
3
4
5
6
7
8
9
10
11
12
13
14\writestatus { loading } { ConTeXt Core Macros Two Pass Data }
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
68
69
70
71
72\unprotect
73
74\registerctxluafile { core two } { }
75
76\def \immediatesavetwopassdata # 1 # 2 # 3 { \normalexpanded { \noexpand \clf_savetwopassdata { # 1 } { # 3 } } }
77\def \lazysavetwopassdata # 1 # 2 # 3 { \normalexpanded { \noexpand \ctxlatecommand{ savetwopassdata ( " #1 " , " #3 " ) } } }
78\let \savetwopassdata \lazysavetwopassdata
79\def \savetaggedtwopassdata # 1 # 2 # 3 # 4 { \normalexpanded { \noexpand \clf_savetaggedtwopassdata { # 1 } { # 3 } { # 4 } } }
80\def \lazysavetaggedtwopassdata # 1 # 2 # 3 # 4 { \normalexpanded { \noexpand \ctxlatecommand{ savetaggedtwopassdata ( " #1 " , ' #3 ' , " #4 " ) } } }
81
82
83
84\setfalse \twopassdatafound
85\let \twopassdata \empty
86\let \twopassdatalist \empty
87
88\newif \iftwopassdatafound
89
90\def \syst_twopass_check
91 { \ifx \twopassdata \empty
92 \twopassdatafoundfalse
93 \setfalse \twopassdatafound
94 \else
95 \twopassdatafoundtrue
96 \settrue \twopassdatafound
97 \fi }
98
99\def \syst_twopass_set_not_found
100 { \twopassdatafoundfalse
101 \setfalse \twopassdatafound }
102
103\def \syst_twopass_set_found
104 { \twopassdatafoundtrue
105 \settrue \twopassdatafound }
106
107\unexpanded \def \definetwopasslist # 1 { \clf_definetwopasslist { # 1 } }
108\unexpanded \def \gettwopassdata # 1 { \edef \twopassdata { \clf_gettwopassdata { # 1 } } \syst_twopass_check }
109\unexpanded \def \checktwopassdata # 1 { \edef \twopassdata { \clf_checktwopassdata { # 1 } } \syst_twopass_check }
110\unexpanded \def \findtwopassdata # 1 # 2 { \edef \twopassdata { \clf_findtwopassdata { # 1 } { # 2 } } \syst_twopass_check }
111\unexpanded \def \getfirsttwopassdata # 1 { \edef \twopassdata { \clf_getfirsttwopassdata { # 1 } } \syst_twopass_check }
112\unexpanded \def \getlasttwopassdata # 1 { \edef \twopassdata { \clf_getlasttwopassdata { # 1 } }
113 \edef \noftwopassitems { \clf_counttwopassdata { # 1 } } \syst_twopass_check }
114\unexpanded \def \getnamedtwopassdatalist # 1 # 2 { \edef # 1 { \clf_gettwopassdatalist { # 2 } } }
115\unexpanded \def \gettwopassdatalist # 1 { \edef \twopassdatalist { \clf_gettwopassdatalist { # 1 } } }
116
117\unexpanded \def \doifelseintwopassdata # 1 # 2 { \clf_doifelseintwopassdata { # 1 } { # 2 } }
118
119 \let \doifintwopassdataelse \doifelseintwopassdata
120 \let \getfromtwopassdata \findtwopassdata
121
122\protect \endinput
123 |