diff options
| author | Hans Hagen <pragma@wxs.nl> | 2007-12-31 11:54:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2007-12-31 11:54:00 +0100 |
| commit | f5db49f15c3f9ec7dba40d6120b89df2cd0030ff (patch) | |
| tree | 46248003cc54a3c00875c0dd9fd692d9b2631ddc /tex/context/base/unic-ini.mkii | |
| parent | fd7a16a8cc13f71119d5fbad9a395cd3d2107d89 (diff) | |
| download | context-f5db49f15c3f9ec7dba40d6120b89df2cd0030ff.tar.gz | |
stable 2007.12.31 11:54
Diffstat (limited to 'tex/context/base/unic-ini.mkii')
| -rw-r--r-- | tex/context/base/unic-ini.mkii | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/tex/context/base/unic-ini.mkii b/tex/context/base/unic-ini.mkii index f78e09905..000d7f948 100644 --- a/tex/context/base/unic-ini.mkii +++ b/tex/context/base/unic-ini.mkii @@ -166,7 +166,7 @@ \def\utfdiv#1{\the\numexpr (#1-\utf@g)/\utf@h \relax} \def\utfmod#1{\the\numexpr#1-\utf@h*((#1-\utf@g)/\utf@h)\relax} -%D The next one also handles the zero case well: +%D The next one also handles the zero case well: (not really utf specific btw) \def\utfdiv#1{\the\numexpr\ifcase\numexpr#1\relax0\else (#1-\utf@g)/\utf@h \fi\relax} \def\utfmod#1{\the\numexpr\ifcase\numexpr#1\relax0\else#1-\utf@h*((#1-\utf@g)/\utf@h)\fi\relax} @@ -741,12 +741,14 @@ \endETEX +\def\numbertohexstring#1{0x\uchexnumbers{\utfdiv{#1}}\uchexnumbers{\utfmod{#1}}} + \beginXETEX - \def\numbertoutf#1{[\number#1]} % xetex has no way to output 8 bit (i.e. \rawcharacter) + \let\numbertoutf\numbertohexstring \endXETEX \beginTEX - \def\numbertoutf#1{[\number#1]} + \let\numbertoutf\numbertohexstring \endTEX \def\uchartoutf#1#2% |