blob: 137d636cc64c7fca7ad7efec150c59794b92b2cd (
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
86
87
88
|
\ProvidesExplPackage {tagpdf-user} {2018/07/09} {0.2}
{tagpdf - user commands}
\NewDocumentCommand \tagpdfsetup { m }
{
\keys_set:nn { tagpdf-setup } { #1 }
}
\cs_set_eq:NN\tagpdfifluatexTF \sys_if_engine_luatex:TF
\cs_set_eq:NN\tagpdfifluatexT \sys_if_engine_luatex:T
\cs_set_eq:NN\tagpdfifpdftexT \sys_if_engine_pdftex:T
%%%% mc related user commands
\NewDocumentCommand \tagmcifinTF { m m }
{
\_uftag_mc_if_in:TF { #1 } { #2 }
}
\NewDocumentCommand \tagmcbegin { m }
{
\uftag_mc_begin:n {#1}\ignorespaces
}
\NewDocumentCommand \tagmcend { }
{
\unskip\uftag_mc_end:
}
\NewDocumentCommand \tagmcuse { m }
{
\uftag_mc_use:n {#1}
}
%%%% structure related commands
\NewDocumentCommand \tagstructbegin { m }
{
\uftag_struct_begin:n {#1}
}
\NewDocumentCommand \tagstructend { }
{
\uftag_struct_end:
}
\NewDocumentCommand \tagstructuse { m }
{
\uftag_struct_use:n {#1}
}
%%%% debug/show commands
\NewDocumentCommand\showtagpdfmcdata { O {\__uftag_get_mc_abs_cnt:} }
{
\bool_if:NT \g__uftag_mode_lua_bool
{
\sys_if_engine_luatex:T
{
\directlua{uftag.trace.show_all_mc_data(#1)}
}
}
}
\NewDocumentCommand\showtagpdfattributes { }
{
\bool_if:NT \g__uftag_mode_lua_bool
{
\sys_if_engine_luatex:T
{
\directlua
{
uftag.trace.log(
"showtagpdfattributes: MC=>abscnt=\__uftag_get_mc_abs_cnt:=>attr=\the\g__uftag_mc_cnt_attr=>tag=" ..
tostring(uftag.func.get_tag_from (\the\g__uftag_mc_type_attr)) ..
"=\the\g__uftag_mc_type_attr",0
)
}
\ignorespaces
}
}
}
\endinput
|