1 files changed, 49 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/context/base/luat-deb.tex b/Master/texmf-dist/tex/context/base/luat-deb.tex
new file mode 100644
index 00000000000..55686ac1144
--- /dev/null
+++ b/Master/texmf-dist/tex/context/base/luat-deb.tex
@@ -0,0 +1,49 @@
+%D \module
+%D   [       file=luat-deb,
+%D        version=2005.11.06,
+%D          title=\CONTEXT\ Communication Macros,
+%D       subtitle=Initialization,
+%D         author=Hans Hagen,
+%D           date=\currentdate,
+%D      copyright=PRAGMA]
+%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}{Communication Support (initialization)}
+
+\registerctxluafile{luat-deb}{1.001}
+
+\startruntimeluacode
+    \ctxlua {
+        lmx.htmfile = function(name) return environment.jobname .. "-status.html" end
+        lmx.lmxfile = function(name) return environment.texfile(name) end
+    }
+\stopruntimeluacode
+
+\def\showdebuginfo{\ctxlua{tracers.showdebuginfo()}}
+\def\overloaderror{\ctxlua{tracers.overloaderror()}}
+
+\def\breakpoint{\showdebuginfo\wait}
+
+\registerctxluafile{luat-tra}{1.001}
+
+\appendtoks
+    \ctxlua {
+        if debugger.tracing() then
+            debugger.enable() ;
+        end
+    }%
+\to \everyjob
+
+\appendtoks
+    \ctxlua {
+        if debugger.tracing() then
+            debugger.disable() ;
+            debugger.savestats("\jobname-luacalls.log") ;
+        end
+    }%
+\to \everybye
+
+\endinput