summaryrefslogtreecommitdiff
path: root/tex/context/base/core-con.mkii
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/core-con.mkii')
-rw-r--r--tex/context/base/core-con.mkii30
1 files changed, 1 insertions, 29 deletions
diff --git a/tex/context/base/core-con.mkii b/tex/context/base/core-con.mkii
index 9a4a0b0ff..d9347b475 100644
--- a/tex/context/base/core-con.mkii
+++ b/tex/context/base/core-con.mkii
@@ -94,33 +94,7 @@
\unknowncharacter
\fi}}
-\beginTEX
-
-\def\dodoconvertcharacters#1#2#3%
- {\ifnum#3>#1
- \bgroup
- \!!counta#3\relax
- \ifnum\!!counta>\zerocount
- \advance\!!counta \minusone
- \!!countb\!!counta
- \divide\!!counta #1%
- \!!countc\!!counta
- \multiply\!!countc #1%
- \advance\!!countb -\!!countc
- \doconvertcharacters#3{\!!counta}%
- \advance\!!countb \plusone
- #3{\the\!!countb}%
- \fi
- \egroup
- \else
- #2{#3}% pure expansion, used in references
- \fi}
-
-\endTEX
-
-%D A fully expandable alternative:
-
-\beginETEX \numexpr
+%D The fully expandable alternative:
\def\dodoconvertcharacters#1#2#3%
{\ifcase#3\else
@@ -132,8 +106,6 @@
\fi
\fi}
-\endETEX
-
\def\doconvertcharacters{\dodoconvertcharacters{26}}
\def\characters{\doconvertcharacters\character}