diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2012-08-03 07:15:07 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2012-08-03 07:15:07 +0000 |
commit | a62a786556ccac143ed30c9058d25483c04b6950 (patch) | |
tree | 7c5542d72911c90a28d130fc3e7e98b3c5295970 /Build/source/texk/web2c/etexdir/etex.ch | |
parent | 682091683666808edd331cde30d349d4dd73aba9 (diff) |
e-TeX 2.5: Better tracing of font definitions
git-svn-id: svn://tug.org/texlive/trunk@27296 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/etexdir/etex.ch')
-rw-r--r-- | Build/source/texk/web2c/etexdir/etex.ch | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/etexdir/etex.ch b/Build/source/texk/web2c/etexdir/etex.ch index 3974121ce84..91f76e20be0 100644 --- a/Build/source/texk/web2c/etexdir/etex.ch +++ b/Build/source/texk/web2c/etexdir/etex.ch @@ -99,6 +99,9 @@ % e-TeX and pTeX, in part suggested by Hironori Kitagawa % <h_kitagawa2001@@yahoo.co.jp>, Mar 2011. % Version 2.4 fixed an uninitialized line number bug, released in May 2012. +% Version 2.5 development was started in Aug 2012; released in ??? 20??. +% better tracing of font definitions, reported by +% Bruno Le Floch <blflatex@@gmail.com>, Jul 2012. % Although considerable effort has been expended to make the e-TeX program % correct and reliable, no warranty is implied; the author disclaims any @@ -184,8 +187,8 @@ known as `\eTeX'. @d banner=='This is TeX, Version 3.1415926' {printed when \TeX\ starts} @y @d eTeX_version=2 { \.{\\eTeXversion} } -@d eTeX_revision==".4" { \.{\\eTeXrevision} } -@d eTeX_version_string=='-2.4' {current \eTeX\ version} +@d eTeX_revision==".5" { \.{\\eTeXrevision} } +@d eTeX_version_string=='-2.5' {current \eTeX\ version} @# @d eTeX_banner=='This is e-TeX, Version 3.1415926',eTeX_version_string {printed when \eTeX\ starts} @@ -2983,6 +2986,12 @@ set_shape: begin q:=cur_chr; scan_optional_equals; scan_int; n:=cur_val; define(q,shape_ref,p); @z %--------------------------------------- +@x [49] m.1260 l.23346 new_font - e-TeX tracing +common_ending: equiv(u):=f; eqtb[font_id_base+f]:=eqtb[u]; font_id_text(f):=t; +@y +common_ending: define(u,set_font,f); eqtb[font_id_base+f]:=eqtb[u]; font_id_text(f):=t; +@z +%--------------------------------------- @x [49] m.1292 l.23633 - e-TeX show_groups show_lists:print_esc("showlists"); @y |