diff options
Diffstat (limited to 'Build/source/texk/web2c/pmpostdir/ptfmin.ch')
-rw-r--r-- | Build/source/texk/web2c/pmpostdir/ptfmin.ch | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/Build/source/texk/web2c/pmpostdir/ptfmin.ch b/Build/source/texk/web2c/pmpostdir/ptfmin.ch index 2990dc11044..296a98a74df 100644 --- a/Build/source/texk/web2c/pmpostdir/ptfmin.ch +++ b/Build/source/texk/web2c/pmpostdir/ptfmin.ch @@ -36,6 +36,10 @@ @d read_pair(A) { (A)=tfbyte; tfget; (A)=(A)*0400+tfbyte; } +@d read_triplekanji(A) { (A)=tfbyte; + tfget; (A)=(A)*0400+tfbyte; + tfget; (A)=(A)+tfbyte*0200000; +} @d read_two(A) { (A)=tfbyte; @z @@ -91,10 +95,9 @@ tf_ignore(4*(tfm_lh-2)) ii=mp->ctype_base[n]+nt; i=mp->ctype_base[n]; while ( i<ii ) { - tfget; read_pair(ct); /* allow character codes up to 0xffff */ + tfget; read_triplekanji(ct); /* allow character codes up to 0xffffff */ mp->font_info[i].hh.LH=ct; - tfget; read_two(ct); - mp->font_info[i].hh.RH=ct; + tfget; mp->font_info[i].hh.RH=tfbyte; incr(i); } @z |