1 files changed, 48 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/mtx-context-timing.tex b/tex/context/base/mkiv/mtx-context-timing.tex
new file mode 100644
index 000000000..c545c768f
--- /dev/null
+++ b/tex/context/base/mkiv/mtx-context-timing.tex
@@ -0,0 +1,48 @@
+%D \module
+%D   [       file=mtx-context-timing,
+%D        version=2009.03.21,
+%D          title=\CONTEXT\ Extra Trickry,
+%D       subtitle=Timing Runs,
+%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.
+
+% begin help
+%
+% usage: context --extra=timing filename
+%
+% end help
+
+\enablemode[no-timing] \usemodule[timing]
+
+\setuplayout
+  [topspace=1cm,
+   bottomspace=.5cm,
+   header=0pt,
+   width=middle,
+   height=middle,
+   style=\tt]
+
+\setupfootertexts
+  [\getdocumentfilename{1}-luatex-progress.lut \emdash\ \pagenumber]
+
+\setupcolors
+  [state=start]
+
+\starttext
+
+
+    \doifsomethingelse {\getdocumentfilename{1}} {
+        \writestatus{system}{processing timings of \getdocumentfilename{1}}
+        \LoadUsage{\getdocumentfilename{1}-luatex-progress}
+        \ShowUsage{\getdocumentfilename{1}-luatex-progress}
+    } {
+        \writestatus{system}{no filename given for timings}
+    }
+
+\stoptext
+