diff options
Diffstat (limited to 'tex/context/base/mkiv/char-ini.mkxl')
-rw-r--r-- | tex/context/base/mkiv/char-ini.mkxl | 130 |
1 files changed, 0 insertions, 130 deletions
diff --git a/tex/context/base/mkiv/char-ini.mkxl b/tex/context/base/mkiv/char-ini.mkxl deleted file mode 100644 index 1df5d4b01..000000000 --- a/tex/context/base/mkiv/char-ini.mkxl +++ /dev/null @@ -1,130 +0,0 @@ -%D \module -%D [ file=char-ini, -%D version=2006.08.20, -%D title=\CONTEXT\ Character Support, -%D subtitle=Initialization, -%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 Character Support / Initialization} - -\registerctxluafile{char-fio}{} -\registerctxluafile{char-map}{} % maybe we will load this someplace else -\registerctxluafile{char-tex}{} -\registerctxluafile{char-ent}{} - -\unprotect - -% ¨äëïöüÿ -% ´áćéíĺńóŕśúýź -% ˙ċėġiż -% ¯āēīōū -% ˝őű -% ˆâĉêĝĥîĵôŝûŵŷ -% `àèìòùỳ -% ¸çķļņŗşţ -% ˛ąęįų -% ˚åů -% ˘ăĕğĭŏŭ -% ˇčďěľňřšťž -% ˜ãĩñõũ - -% \def\checkedchar#1% #2% -% {\relax\iffontchar\font#1 \expandafter\firstoftwoarguments\else\expandafter\secondoftwoarguments\fi{\char#1}} -% -% impossible in math mode so there always fallback (till we have gyre): -% -% use \normalUchar when possible .. the next one is nice for documents and it also accepts -% 0x prefixed numbers - -\permanent\def\utfchar #1{\clf_utfchar {#1}} % todo: define public at lua end -\permanent\def\safechar#1{\clf_safechar{#1}} % todo: define public at lua end - -\permanent\protected\def\Ux #1{\Uchar\numexpr"#1\relax} % used in xml (sometimes overloaded) -\permanent \def\eUx#1{\Uchar\numexpr"#1\relax} % used in xml (sometimes overloaded) - -\permanent\def\expandUx{\enforced\let\Ux\eUx} - -\permanent \def\checkedchar {\relax\ifmmode\expandafter\checkedmathchar\else\expandafter\checkedtextchar\fi} % #1#2 -\permanent \def\checkedmathchar#1#2{#2} -%permanent \def\checkedtextchar #1{\iffontchar\font#1 \expandafter\firstoftwoarguments\else\expandafter\secondoftwoarguments\fi{\char#1}} -\permanent\protected\def\checkedtextchar #1{\clf_doifelsecharinfont\numexpr#1\relax{\char#1}} % {#2} - -\newconditional\prefermathovertextchar - -\permanent\protected\def\textormathchar#1% - {\begingroup - \scratchcounter#1\relax - \ifmmode - \char\scratchcounter - \else - \ifconditional\prefermathovertextchar - % dirty trick .. maybe let this adapt to bf too ? - \setfontid\fontid\textfont\c_font_fam_mr - \fi - \iffontchar\font\scratchcounter - \char\scratchcounter - \else - \normalstartimath\char\scratchcounter\normalstopimath - \fi - \fi - \endgroup} - -\permanent\protected\def\textormathchars#1% - {{\font_text_or_mathchars#1\relax}} - -\protected\def\font_text_or_mathchars#1#2\relax - {\relax\ifmmode - #1#2% - \orelse\iffontchar\font`#1\relax - #1#2\relax - \else - \normalstartimath#1#2\normalstopimath - \fi} - -%D The codes are stored in the format, so we don't need to reinitialize -%D them (unless of course we have adapted the table). It is on the agenda -%D to do this with \type {tex.lccode} cum suis once they're available. - -% \def\setcclcuc#1#2#3{\global\catcode#1=\lettercatcode\global\lccode#1=#2\global\uccode#1=#3\relax} -% \def\setcclcucself#1{\global\catcode#1=\lettercatcode\global\lccode#1=#1\global\uccode#1=#1\relax } - -% Is setting up vrb tpa and tpb needed? - -% move to lua side - -%clf_setcharactercodes - -\clf_setlettercatcodes\texcatcodes -\clf_setlettercatcodes\ctxcatcodes -\clf_setlettercatcodes\notcatcodes -%clf_setlettercatcodes\mthcatcodes -\clf_setlettercatcodes\vrbcatcodes -\clf_setlettercatcodes\prtcatcodes -\clf_setlettercatcodes\tpacatcodes -\clf_setlettercatcodes\tpbcatcodes -\clf_setlettercatcodes\txtcatcodes - -\clf_setactivecatcodes\ctxcatcodes -\clf_setactivecatcodes\notcatcodes -\clf_setactivecatcodes\prtcatcodes - -\clf_setcharacternames\ctxcatcodes - -\permanent\def\chardescription#1{\clf_chardescription#1\relax} - -% experiment (watch out: this is global and very font dependent when used with -% casing mechanisms) -% -% \overloaduppercase{0xDF}{0x1E9E}} -% \overloaduppercase{0xDF}{0x53,0x53} - -\permanent\protected\def\overloaduppercase{\clf_overloaduppercase} % todo: define public at lua end -\permanent\protected\def\overloadlowercase{\clf_overloadlowercase} % todo: define public at lua end - -\protect \endinput |