1 files changed, 33 insertions, 33 deletions
diff --git a/tex/context/base/catc-ini.mkiv b/tex/context/base/catc-ini.mkiv
index 56a8f87e1..9221d17c5 100644
--- a/tex/context/base/catc-ini.mkiv
+++ b/tex/context/base/catc-ini.mkiv
@@ -316,39 +316,39 @@
 
 % \tracecatcodetables
 
-%D Only in \MKIV\ (to be used when crossing pages with changed catcodes
-%D in the current vector):
-%D
-%D \starttyping
-%D \normalprotected\def\startcrap
-%D   {\bgroup
-%D    \pushcatcodes
-%D    \whitespace
-%D    \obeylines
-%D    \activatespacehandler\v!yes
-%D    \strut}
-%D
-%D \normalprotected\def\stopcrap
-%D   {\popcatcodes
-%D   \egroup}
-%D \stoptyping
-
-\newcount\catcodetablelevel
-
-\def\pushcatcodes
-  {\bgroup
-   \global\advance\catcodetablelevel\plusone
-   \ifcsname @@ccf:\number\catcodetablelevel\endcsname \else
-     \global\advance\cctdefcounter\plusone
-     \expandafter\global\expandafter\chardef\csname @@ccf:\number\catcodetablelevel\endcsname\cctdefcounter
-   \fi
-   \catcodetable\ctxcatcodes
-   \expandafter\savecatcodetable\csname @@ccf:\number\catcodetablelevel\endcsname
-   \egroup
-   \expandafter\catcodetable\csname @@ccf:\number\catcodetablelevel\endcsname}
-
-\def\popcatcodes
-  {\global\advance\catcodetablelevel\minusone}
+% D Only in \MKIV\ (to be used when crossing pages with changed catcodes
+% D in the current vector):
+% D
+% D \starttyping
+% D \normalprotected\def\startcrap
+% D   {\bgroup
+% D    \pushcatcodes
+% D    \whitespace
+% D    \obeylines
+% D    \activatespacehandler\v!yes
+% D    \strut}
+% D
+% D \normalprotected\def\stopcrap
+% D   {\popcatcodes
+% D   \egroup}
+% D \stoptyping
+%
+% \newcount\catcodetablelevel
+%
+% \def\pushcatcodes
+%   {\bgroup
+%    \global\advance\catcodetablelevel\plusone
+%    \ifcsname @@ccf:\number\catcodetablelevel\endcsname \else
+%      \global\advance\cctdefcounter\plusone
+%      \expandafter\global\expandafter\chardef\csname @@ccf:\number\catcodetablelevel\endcsname\cctdefcounter
+%    \fi
+%    \catcodetable\ctxcatcodes
+%    \expandafter\savecatcodetable\csname @@ccf:\number\catcodetablelevel\endcsname
+%    \egroup
+%    \expandafter\catcodetable\csname @@ccf:\number\catcodetablelevel\endcsname}
+%
+% \def\popcatcodes
+%   {\global\advance\catcodetablelevel\minusone}
 
 \endinput