summaryrefslogtreecommitdiff
path: root/Build/source/texk
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2012-06-28 13:21:46 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2012-06-28 13:21:46 +0000
commit6cac2baeda99335089161cae1195c3d479c4e073 (patch)
treee26b13bd07e06ff9b0ef3ab7ba53392ab79778ac /Build/source/texk
parentb1924bf9d717c6a6749aea733dafcc93b11f46f4 (diff)
XeTeX uses 256 math font families (from Akira)
git-svn-id: svn://tug.org/texlive/trunk@26910 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk')
-rw-r--r--Build/source/texk/web2c/xetexdir/ChangeLog4
-rw-r--r--Build/source/texk/web2c/xetexdir/xetex.ch16
2 files changed, 20 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/xetexdir/ChangeLog b/Build/source/texk/web2c/xetexdir/ChangeLog
index dbb726add7f..f979845db31 100644
--- a/Build/source/texk/web2c/xetexdir/ChangeLog
+++ b/Build/source/texk/web2c/xetexdir/ChangeLog
@@ -1,3 +1,7 @@
+2012-06-25 Akira Kakuto <kakuto@fuk.kindai.ac.jp>
+
+ * xetex.ch: XeTeX uses 256 math font families.
+
2012-05-07 Khaled Hosny <khaledhosny@eglug.org>
* am/xetex.am (xetex_web_srcs): Drop enctex.ch.
diff --git a/Build/source/texk/web2c/xetexdir/xetex.ch b/Build/source/texk/web2c/xetexdir/xetex.ch
index 7009defd985..45331796f2d 100644
--- a/Build/source/texk/web2c/xetexdir/xetex.ch
+++ b/Build/source/texk/web2c/xetexdir/xetex.ch
@@ -3132,6 +3132,16 @@ goto done
@z
@x
+else if cur_cmd=def_family then
+ begin m:=cur_chr; scan_four_bit_int; f:=equiv(m+cur_val);
+ end
+@y
+else if cur_cmd=def_family then
+ begin m:=cur_chr; scan_math_fam_int; f:=equiv(m+cur_val);
+ end
+@z
+
+@x
@ When \TeX\ wants to typeset a character that doesn't exist, the
character node is not created; thus the output routine can assume
that characters exist when it sees them. The following procedure
@@ -5905,6 +5915,12 @@ whatsit_node: @<Let |d| be the width of the whatsit |p|, and |goto found| if ``v
@z
@x
+@d fam_in_range==((cur_fam>=0)and(cur_fam<16))
+@y
+@d fam_in_range==((cur_fam>=0)and(cur_fam<number_math_families))
+@z
+
+@x
letter,other_char,char_given: begin c:=ho(math_code(cur_chr));
if c=@'100000 then
@y