diff options
| author | Hans Hagen <pragma@wxs.nl> | 2020-07-09 15:15:53 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-07-09 15:15:53 +0200 |
| commit | b4260c7c04f7e82a9987b7bb758040853ebc464e (patch) | |
| tree | 4191ca6d239722bb18d796f42a4fb8557f1e4a5c /tex/context/base/mkiv/catc-sym.mkiv | |
| parent | 563c81a9faf538d1d1f362dc0a5e3bccc0de8023 (diff) | |
| download | context-b4260c7c04f7e82a9987b7bb758040853ebc464e.tar.gz | |
2020-07-09 14:50:00
Diffstat (limited to 'tex/context/base/mkiv/catc-sym.mkiv')
| -rw-r--r-- | tex/context/base/mkiv/catc-sym.mkiv | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/tex/context/base/mkiv/catc-sym.mkiv b/tex/context/base/mkiv/catc-sym.mkiv index 5cda010fe..abe9191d9 100644 --- a/tex/context/base/mkiv/catc-sym.mkiv +++ b/tex/context/base/mkiv/catc-sym.mkiv @@ -79,13 +79,13 @@ %D them for convenience and compatibility. Some old engine code %D has been removed. -\normalprotected\def\uncatcodespecials {\setcatcodetable\nilcatcodes \uncatcodespacetokens} -\normalprotected\def\setnaturalcatcodes {\setcatcodetable\nilcatcodes} -\normalprotected\def\setnormalcatcodes {\setcatcodetable\ctxcatcodes} % maybe \texcatcodes -\normalprotected\def\uncatcodecharacters {\setcatcodetable\nilcatcodes} % was fast version, gone now -\normalprotected\def\uncatcodeallcharacters{\setcatcodetable\nilcatcodes} % was slow one, with restore +\protected\def\uncatcodespecials {\setcatcodetable\nilcatcodes \uncatcodespacetokens} +\protected\def\setnaturalcatcodes {\setcatcodetable\nilcatcodes} +\protected\def\setnormalcatcodes {\setcatcodetable\ctxcatcodes} % maybe \texcatcodes +\protected\def\uncatcodecharacters {\setcatcodetable\nilcatcodes} % was fast version, gone now +\protected\def\uncatcodeallcharacters{\setcatcodetable\nilcatcodes} % was slow one, with restore -\normalprotected\def\uncatcodespacetokens +\protected\def\uncatcodespacetokens {\catcode\spaceasciicode \spacecatcode \catcode\tabasciicode \spacecatcode \catcode\formfeedasciicode \endoflinecatcode @@ -101,10 +101,10 @@ \newtoks\everyverbosechacters -\normalprotected\def\setverbosecscharacter#1% +\protected\def\setverbosecscharacter#1% {\edef#1{\string#1}} -\normalprotected\def\setverbosecscharacters +\protected\def\setverbosecscharacters {\the\everyverbosechacters} \bgroup |