blob: 50b71d9d2dc9a265981a7a6e3ea771fe7a203e44 (
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
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
|
%D \module
%D [ file=strc-doc,
%D version=2008.10.20,
%D title=\CONTEXT\ Structure Macros,
%D subtitle=Document Structure,
%D author=Hans Hagen,
%D date=\currentdate,
%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
%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}{ConTeXt Structure Macros / Document Structure}
\registerctxluafile{strc-doc}{}
\unprotect
%D This will move:
\mutable\let\currentstructureattribute \empty
\mutable\let\currentstructurebackreference \empty
\mutable\let\currentstructurebookmark \empty
\mutable\let\currentstructurecatcodes \empty
\mutable\let\currentstructurecoding \empty
\mutable\let\currentstructurecoupling \empty
\mutable\let\currentstructureexpansion \empty
\mutable\let\currentstructureincrementnumber \empty
\mutable\let\currentstructurelabel \empty
\mutable\let\currentstructurelevel \empty
\mutable\let\currentstructurelist \empty
\mutable\let\currentstructurelistattribute \empty
\mutable\let\currentstructuremarking \empty
\mutable\let\currentstructurename \empty
\mutable\let\currentstructureownnumber \empty
\mutable\let\currentstructureplaceholder \empty
\mutable\let\currentstructurereference \empty
\mutable\let\currentstructurereferenceattribute \empty
\mutable\let\currentstructurereferenceprefix \empty
\mutable\let\currentstructuresaveinlist \empty
\mutable\let\currentstructureshownumber \empty
\mutable\let\currentstructuretitle \empty
\mutable\let\currentstructurexmlsetup \empty
\mutable\let\currentstructurecomponentattribute \empty
\mutable\let\currentstructurecomponentbookmark \empty
\mutable\let\currentstructurecomponentcatcodes \empty
\mutable\let\currentstructurecomponentcoding \empty
\mutable\let\currentstructurecomponentexpansion \empty
\mutable\let\currentstructurecomponentlabel \empty
\mutable\let\currentstructurecomponentlevel \empty
\mutable\let\currentstructurecomponentlist \empty
\mutable\let\currentstructurecomponentmarking \empty
\mutable\let\currentstructurecomponentname \empty
\mutable\let\currentstructurecomponentreference \empty
\mutable\let\currentstructurecomponentreferenceprefix\empty
\mutable\let\currentstructurecomponentsynchronize \empty
\mutable\let\currentstructurecomponenttitle \empty
\mutable\let\currentstructurecomponentxmlsetup \empty
\permanent\protected\def\setstructuresynchronization#1% todo: use ctxcontext
{\clf_setinternalreference
prefix {\currentstructurereferenceprefix}%
reference {\currentstructurereference}
internal \locationcount
view {\interactionparameter\c!focus}%
\relax
\enforced\xdef\currentstructureattribute
{\the\lastdestinationattribute}%
\enforced\xdef\currentstructuresynchronize
{\currentstructuresynchronize
\strc_lists_inject_enhance{#1}}}
\permanent\protected\def\setstructurecomponentsynchronization#1% todo: use ctxcontext
{\clf_setinternalreference
prefix {\currentstructurecomponentreferenceprefix}%
reference {\currentstructurecomponentreference}
internal \locationcount
view {\interactionparameter\c!focus}%
\relax
\enforced\xdef\currentstructurecomponentattribute {\the\lastdestinationattribute}%
\enforced\xdef\currentstructurecomponentsynchronize{\strc_lists_inject_enhance{#1}}}
\protect \endinput
|