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
89
90
91
92
93
|
%D \module
%D [ file=cont-yes,
%D version=2012.06.01,
%D title=\CONTEXT\ Miscellaneous Macros,
%D subtitle=Startup Stub,
%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.
% At some point I will reconsider the \starttext .. \stoptext
% wraping as we can assume proper styling. It's a left-over from
% mkii that we need to get rid of.
\startluacode
-- When a style is loaded there is a good change that we never enter
-- this code.
local report = logs.reporter("system")
environment.initializefilenames() -- todo: check if we really need to pre-prep the filename
local arguments = environment.arguments
local suffix = environment.suffix
local filename = environment.filename -- hm, not inputfilename !
if suffix == "xml" or arguments.forcexml then
-- Maybe we should move the preamble parsing here as it
-- can be part of (any) loaded (sub) file. The \starttext
-- wrapping might go away.
report("processing as xml: %s",filename)
context.starttext()
context.xmlprocess("main",filename,"")
context.stoptext()
elseif suffix == "cld" or arguments.forcecld then
report("processing as cld: %s",filename)
context.runfile(filename)
elseif suffix == "lua" or arguments.forcelua then
-- The wrapping might go away. Why is is it there in the
-- first place.
report("processing as lua: %s",filename)
context.starttext()
context.ctxlua(string.format('dofile("%s")',filename))
context.stoptext()
elseif suffix == "mp" or arguments.forcemp then
report("processing as metapost: %s",filename)
context.starttext()
context.processMPfigurefile(filename)
context.stoptext()
-- elseif suffix == "prep" then
--
-- -- Why do we wrap here. Because it can be xml? Let's get rid
-- -- of prepping in general.
--
-- context.starttext()
-- context.input(filename)
-- context.stoptext()
else
-- \writestatus{system}{processing as tex}
-- We have a regular tex file so no \starttext yet as we can
-- load fonts.
-- context.enabletrackers { "resolvers.*" }
context.input(filename)
-- context.disabletrackers { "resolvers.*" }
end
context.finishjob()
\stopluacode
\endinput
|
