From 974640d66e61e81cb197ad96fdff7b08343e4c5a Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 6 Mar 2021 21:58:15 +0000 Subject: context git-svn-id: svn://tug.org/texlive/trunk@58167 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/tex/context/base/mkxl/typo-dig.mkxl | 58 ++++++++++++++++++++++ 1 file changed, 58 insertions(+) create mode 100644 Master/texmf-dist/tex/context/base/mkxl/typo-dig.mkxl (limited to 'Master/texmf-dist/tex/context/base/mkxl/typo-dig.mkxl') diff --git a/Master/texmf-dist/tex/context/base/mkxl/typo-dig.mkxl b/Master/texmf-dist/tex/context/base/mkxl/typo-dig.mkxl new file mode 100644 index 00000000000..308ccb66e61 --- /dev/null +++ b/Master/texmf-dist/tex/context/base/mkxl/typo-dig.mkxl @@ -0,0 +1,58 @@ +%D \module +%D [ file=typo-dig, +%D version=2010.01.18, +%D title=\CONTEXT\ Typesetting Macros, +%D subtitle=Digits, +%D author=Hans Hagen, +%D date=\currentdate, +%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] +%C +%C This module is part of the \CONTEXT\ macro||package and is +%C therefore copyrighted by \PRAGMA. See mreadme.pdf for +%C details. + +\writestatus{loading}{ConTeXt Typesetting Macros / Digits} + +\unprotect + +\registerctxluafile{typo-dig}{autosuffix} + +\definesystemattribute[digits][public] + +%D This could as well be a dynamic font feature but why bother. +%D +%D \macros +%D {\equaldigits} +%D +%D \startbuffer +%D test test \ruledhbox{123} test test\par +%D test test \ruledhbox{\equaldigits{123}} test test\par +%D test test \equaldigits{123} test test\par +%D \stopbuffer +%D +%D \typebuffer +%D +%D This calls result in: +%D +%D \startlines +%D \getbuffer +%D \stoplines + +\permanent\protected\def\setdigitsmanipulation[#1]% can be public implementor + {\clf_setdigitsmanipulation{#1}} + +\permanent\protected\def\resetdigitsmanipulation + {\c_attr_digits\attributeunsetvalue} + +\appendtoks + \resetdigitsmanipulation +\to \everyresettypesetting + +\permanent\protected\def\equaldigits{\groupedcommand{\setdigitsmanipulation[\number\plusone]}{}} +\permanent\protected\def\dummydigit {\hphantom {\setdigitsmanipulation[\number\plusone]0}} + +\appendtoks + \resetdigitsmanipulation +\to \everyinitializeverbatim + +\protect \endinput -- cgit v1.2.3