summaryrefslogtreecommitdiff
path: root/tex/context/base/mkxl/core-sys.mkxl
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/mkxl/core-sys.mkxl')
-rw-r--r--tex/context/base/mkxl/core-sys.mkxl15
1 files changed, 11 insertions, 4 deletions
diff --git a/tex/context/base/mkxl/core-sys.mkxl b/tex/context/base/mkxl/core-sys.mkxl
index 832098315..a0bd9debd 100644
--- a/tex/context/base/mkxl/core-sys.mkxl
+++ b/tex/context/base/mkxl/core-sys.mkxl
@@ -291,13 +291,18 @@
\aliased\let\directhighlight\typo_highlights_indeed
+
\permanent\protected\def\defineexpandable
- {\doifelsenextoptional
+ {\integerdef\c_syst_parameter_catcode\catcode\hashasciicode
+ \catcode\hashasciicode\parametercatcode%
+ \doifelsenextoptional
{\syst_basics_define_yes\def}%
{\syst_basics_define_nop\def}}
\permanent\protected\def\define
- {\doifelsenextoptional
+ {\integerdef\c_syst_parameter_catcode\catcode\hashasciicode
+ \catcode\hashasciicode\parametercatcode%
+ \doifelsenextoptional
{\syst_basics_define_yes{\protected\def}}%
{\syst_basics_define_nop{\protected\def}}}
@@ -316,13 +321,15 @@
#1#3##1##2##3##4##5##6##7{#4}\or
#1#3##1##2##3##4##5##6##7##8{#4}\or
#1#3##1##2##3##4##5##6##7##8##9{#4}\else
- #1#3{#4}\fi}
+ #1#3{#4}\fi
+ \catcode\hashasciicode\c_syst_parameter_catcode}
\protected\def\syst_basics_define_nop#1#2#3%
{\ifdefined#2%
\showmessage\m!system4{\string#2}%
\fi
- #1#2{#3}}
+ #1#2{#3}%
+ \catcode\hashasciicode\c_syst_parameter_catcode}
\aliased\let\redefine\define