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.mkxl12
1 files changed, 8 insertions, 4 deletions
diff --git a/tex/context/base/mkxl/core-sys.mkxl b/tex/context/base/mkxl/core-sys.mkxl
index 946e5630f..5b23e4eab 100644
--- a/tex/context/base/mkxl/core-sys.mkxl
+++ b/tex/context/base/mkxl/core-sys.mkxl
@@ -132,10 +132,10 @@
[ \v!small=>\divide\scratchcounter 15, % 900,
\v!medium=>\divide\scratchcounter 30, % 1800,
\v!big=>\divide\scratchcounter 60, % 3600,
- \v!normal=>\getnewrandomseed\scratchcounter,
- \s!default=>\getnewrandomseed\scratchcounter,
+ \v!normal=>\scratchcounter\newrandomseed,
+ \s!default=>\scratchcounter\newrandomseed,
\s!unknown=>\scratchcounter#1]%
- \expanded{\setrandomseed{\the\scratchcounter}}%
+ \setrandomseed\scratchcounter
% \writestatus\m!system{randomseed: \the\scratchcounter}%
\endgroup}}
@@ -303,11 +303,15 @@
\fi
#1#2{#3}}
-% new:
+\aliased\let\redefine\define
+
+% new but maybe not needed:
%
% \checked\def \whatever#alpha#beta{#alpha + #beta}
% \checked\edef\whatever#alpha#beta{#alpha + #beta}
+\mutable\let\gobbleddefinition\relax % only for diagnostics
+
\permanent\protected\def\unique#1#2%
{\ifdefined#2%
\showmessage\m!system4{\string#2}%