summaryrefslogtreecommitdiff
path: root/tex/context/base/mkxl/syst-aux.mkxl
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/mkxl/syst-aux.mkxl')
-rw-r--r--tex/context/base/mkxl/syst-aux.mkxl45
1 files changed, 22 insertions, 23 deletions
diff --git a/tex/context/base/mkxl/syst-aux.mkxl b/tex/context/base/mkxl/syst-aux.mkxl
index c70ff0170..d2e5ce581 100644
--- a/tex/context/base/mkxl/syst-aux.mkxl
+++ b/tex/context/base/mkxl/syst-aux.mkxl
@@ -122,8 +122,6 @@
\setnewconstant \downrotationangle 180
\setnewconstant \leftrotationangle 270
-\ifdefined\data \else \let\data \relax \fi % dep checker
-
%D \macros
%D {s!,c!,e!,p!,v!,@@,??}
%D
@@ -1322,7 +1320,10 @@
\aliased\let\rawprocesscommalist \processcommalist % can go
\aliased\let\rawprocesscommacommand\processcommacommand % can go
-%D Here is one without nesting .. still needed?
+%D Here is one without nesting .. still needed? Only used for modes (no nesting
+%D there).
+
+\mutable\let\fastcommalistcommand\relax
\protected\def\syst_helpers_process_fast_comma_item#1,%
{\ifarguments
@@ -2901,19 +2902,19 @@
\protected\expandafter\def
\fi#1}
-\permanent\protected\def\redefine#1%
+\protected\def\redefine#1%
{\ifdefined#1%
\message{[\noexpand#1is redefined]}%
\fi
\protected\def#1}
-\permanent\protected\def\definemacro#1%
- {\ifdefined#1%
- \message{[\noexpand#1is already defined]}%
- \protected\expandafter\def\expandafter\gobbleddefinition
- \else
- \protected\expandafter\def
- \fi#1}
+% \permanent\protected\def\definemacro#1%
+% {\ifdefined#1%
+% \message{[\noexpand#1is already defined]}%
+% \protected\expandafter\def\expandafter\gobbleddefinition
+% \else
+% \protected\expandafter\def
+% \fi#1}
% \define\hans{hans}
% \redefine\hans{hans}
@@ -6060,23 +6061,21 @@
\newdimen \roundingeps \roundingeps=10sp
\newconstant\compresult
-\permanent\def\comparedimension#1#2%
+\permanent\protected\def\comparedimension#1#2%
{\compresult
- \ifdim#1<#2%
+ \ifcmpdim#1#2 % space wil be skipped
\zerocount
- \orelse\ifdim#1<#2%
+ \or
\plusone
\else
\plustwo
\fi}
-\permanent\def\comparedimensioneps#1#2% todo: use eps feature
+\permanent\protected\def\comparedimensioneps#1#2% todo: use eps feature
{\compresult
- \ifdim\dimexpr#1-#2\relax<\roudingeps
+ \ifabsdim\dimexpr#1-#2\relax<\roundingeps
\zerocount
- \orelse\ifdim\dimexpr#2-#1\relax<\roudingeps
- \zerocount
- \orelse\ifdim#1<#2%
+ \orelse\ifdim#1<#2 % space wil be skipped
\plusone
\else
\plustwo
@@ -6301,10 +6300,10 @@
\permanent\def\negated#1{\if-#1\else-#1\fi} % does only work in macros or text
-\def\gobbleassigndimen#1\\{}
-
-\permanent\def\assigndimen#1#2%
- {\afterassignment\gobbleassigndimen#1=#2\zeropoint\\}
+% \def\gobbleassigndimen#1\\{}
+%
+% \permanent\def\assigndimen#1#2%
+% {\afterassignment\gobbleassigndimen#1=#2\zeropoint\\}
%D Maybe ... toksapp should deal with this ...