Source Browser ?

1
%D \module
2
%D   [       file=mult-ini,
3
%D        version=2008.10.22, % 1996.06.01,
4
%D          title=\CONTEXT\ Multilingual Macros,
5
%D       subtitle=Initialization,
6
%D         author=Hans Hagen,
7
%D           date=\currentdate,
8
%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
9
%C
10
%C This module is part of the \CONTEXT\ macro||package and is
11
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
12
%C details.
13
14
\writestatus
{
loading
}{
ConTeXt
 
Multilingual
 
Macros
 
/
 
Lua
}
15
16
\registerctxluafile
{
cldf
-
int
}{}
17
18
\unprotect
19
20
\unexpanded
\def
\newluatable
#
1
{
\clf_newluatable
#
1
\atendofgrouped
{
\disposeluatable
#
1
}}
21
\unexpanded
\def
\useluatable
#
1
{
\clf_useluatable
#
1
\atendofgrouped
{
\disposeluatable
#
1
}}
22
23
\installcorenamespace
{
datavalue
}
24
25
\unexpanded
\def
\setdatavalue
#
1
#
2
% #2 is a number (expression)
26  
{
\expandafter\letdatacode\csname
\??datavalue
#
1
\endcsname\numexpr
#
2
\relax
}
27
28
\def
\getdatavalue
#
1
{
\begincsname
\??datavalue
#
1
\endcsname
}
29
\def
\thedatavalue
#
1
{
\the\begincsname
\??datavalue
#
1
\endcsname
}
30
31
\protect
 
\endinput
32