diff options
| author | Hans Hagen <pragma@wxs.nl> | 2022-07-24 12:35:49 +0200 |
|---|---|---|
| committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2022-07-24 12:35:49 +0200 |
| commit | 352517495e32813d30d0080f2a0c8dd1afea794a (patch) | |
| tree | 346f33901602d6bd6db1c5913ff092fcf821fa10 /tex/context/base/mkxl/syst-aux.mkxl | |
| parent | 82c674fdcf5bcff4ad0dc0936d638fc729145616 (diff) | |
| download | context-352517495e32813d30d0080f2a0c8dd1afea794a.tar.gz | |
2022-07-24 12:18:00
Diffstat (limited to 'tex/context/base/mkxl/syst-aux.mkxl')
| -rw-r--r-- | tex/context/base/mkxl/syst-aux.mkxl | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/tex/context/base/mkxl/syst-aux.mkxl b/tex/context/base/mkxl/syst-aux.mkxl index ced19dcd2..018a95eb2 100644 --- a/tex/context/base/mkxl/syst-aux.mkxl +++ b/tex/context/base/mkxl/syst-aux.mkxl @@ -4971,7 +4971,9 @@ % that \TEX\ was written, it made no sense to add a lot of that. After decades we know % what extras we need. -\permanent\def\withoutpt#1{\thewithoutunit\dimexpr#1} % best use the primitive directly +% \permanent\def\withoutpt#1{\thewithoutunit\dimexpr#1} + +\aliased\let\withoutpt\toscaled %D The capitals are needed because \type {p} and \type {t} have catcode~12, while %D macronames only permit tokens with the catcode~11. As a result we cannot use the @@ -4979,10 +4981,9 @@ %D manipulations, we advice to study the \TEX book in detail. Because this macro %D does not do any assignment, we can use it in the following way too. -% \def\PtToCm#1% -% {\withoutpt\the\dimexpr0.0351459804\dimexpr#1\relax\relax cm} +% \permanent\def\PtToCm#1{\thewithoutunit\dimexpr0.0351459804\dimexpr#1\relax\relax cm} -\permanent\def\PtToCm#1{\thewithoutunit\dimexpr0.0351459804\dimexpr#1\relax\relax cm} +\permanent\def\PtToCm#1{\toscaled\dimexpr0.0351459804\dimexpr#1\relax\relax cm} %D We also support: %D @@ -5627,11 +5628,9 @@ %D \PointsToReal {dimension} \target %D \stoptyping -% \protected\def\PointsToReal#1#2% -% {\edef#2{\withoutpt\the\dimexpr#1}} +% \permanent\protected\def\PointsToReal#1#2{\edef#2{\thewithoutunit\dimexpr#1}} -\permanent\protected\def\PointsToReal#1#2% - {\edef#2{\thewithoutunit\dimexpr#1}} +\permanent\protected\def\PointsToReal#1#2{\edef#2{\toscaled#1}} %D \macros %D {dontleavehmode} |