summaryrefslogtreecommitdiff
path: root/tex/context/base/font-uni.tex
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/font-uni.tex')
-rw-r--r--tex/context/base/font-uni.tex13
1 files changed, 13 insertions, 0 deletions
diff --git a/tex/context/base/font-uni.tex b/tex/context/base/font-uni.tex
index 381fa2fdf..d6b340ec3 100644
--- a/tex/context/base/font-uni.tex
+++ b/tex/context/base/font-uni.tex
@@ -180,6 +180,19 @@
\handleunicodeglyph
\egroup}
+%D In \XETEX, unicode support is straightforward, so we
+%D simply output a \type {\char} with a 16||bit number.
+%D
+%D \starttyping
+%D \def\uchar#1#2{\char\numexpr(#2+(#1*256))\relax}
+%D \stoptyping
+
+\beginXETEX \uchar
+
+ \unexpanded\def\uchar#1#2{\char\numexpr#2+#1*\@cclvi\relax}
+
+\endXETEX
+
\def\dohandleucflowglyph
% {\unicodeposition=\unicodeone\unicodetwo\relax
{\unicodeposition\unicodeone\unicodetwo\relax