diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2012-06-28 13:21:46 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2012-06-28 13:21:46 +0000 |
commit | 6cac2baeda99335089161cae1195c3d479c4e073 (patch) | |
tree | e26b13bd07e06ff9b0ef3ab7ba53392ab79778ac /Build/source/texk | |
parent | b1924bf9d717c6a6749aea733dafcc93b11f46f4 (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/ChangeLog | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/xetexdir/xetex.ch | 16 |
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 |