diff options
author | Hans Hagen <pragma@wxs.nl> | 2020-10-31 00:09:22 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2020-10-31 00:09:22 +0100 |
commit | 7043cd3b7046f6a11112a5d49c4ae5e2dc0c6896 (patch) | |
tree | 92ffcd258fb29e37b4a136eb071fbfd0717be29e /tex/context/base/mkiv/cldf-int.mkxl | |
parent | a0270f13065d116355a953c6f246cbba26289fc2 (diff) | |
download | context-7043cd3b7046f6a11112a5d49c4ae5e2dc0c6896.tar.gz |
2020-10-30 22:27:00
Diffstat (limited to 'tex/context/base/mkiv/cldf-int.mkxl')
-rw-r--r-- | tex/context/base/mkiv/cldf-int.mkxl | 23 |
1 files changed, 13 insertions, 10 deletions
diff --git a/tex/context/base/mkiv/cldf-int.mkxl b/tex/context/base/mkiv/cldf-int.mkxl index 603c22afc..a564afc80 100644 --- a/tex/context/base/mkiv/cldf-int.mkxl +++ b/tex/context/base/mkiv/cldf-int.mkxl @@ -1,8 +1,8 @@ %D \module -%D [ file=mult-ini, -%D version=2008.10.22, % 1996.06.01, -%D title=\CONTEXT\ Multilingual Macros, -%D subtitle=Initialization, +%D [ file=cldf-int, +%D version=2019.01.01, +%D title=\CONTEXT\ Data Macros, +%D subtitle=Integer, %D author=Hans Hagen, %D date=\currentdate, %D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] @@ -15,17 +15,20 @@ \registerctxluafile{cldf-int}{autosuffix} +%D These are user commands so we don't add any protection against overloading +%D here. + \unprotect -\unexpanded\def\newluatable#1{\clf_newluatable#1\atendofgrouped{\disposeluatable#1}} -\unexpanded\def\useluatable#1{\clf_useluatable#1\atendofgrouped{\disposeluatable#1}} +\permanent\protected\def\newluatable#1{\clf_newluatable#1\atendofgrouped{\disposeluatable#1}} +\permanent\protected\def\useluatable#1{\clf_useluatable#1\atendofgrouped{\disposeluatable#1}} \installcorenamespace{datavalue} -\unexpanded\def\setdatavalue#1#2% #2 is a number (expression) - {\expandafter\letdatacode\csname\??datavalue#1\endcsname\numexpr#2\relax} +\permanent\protected\def\setdatavalue#1#2% #2 is a number (expression) + {\expandafter\integerdef\csname\??datavalue#1\endcsname\numexpr#2\relax} -\def\getdatavalue#1{\begincsname\??datavalue#1\endcsname} -\def\thedatavalue#1{\the\begincsname\??datavalue#1\endcsname} +\permanent\def\getdatavalue#1{\begincsname\??datavalue#1\endcsname} +\permanent\def\thedatavalue#1{\the\begincsname\??datavalue#1\endcsname} \protect \endinput |