TeX & Co: New versions from Knuth (TeX tuneup of 2014)

git-svn-id: svn://tug.org/texlive/trunk@32727 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 2 insertions, 33 deletions

diff --git a/Build/source/texk/web2c/vftovp.ch b/Build/source/texk/web2c/vftovp.ch
index 273b6337995..3c94bf4d57b 100644
--- a/Build/source/texk/web2c/vftovp.ch
+++ b/Build/source/texk/web2c/vftovp.ch
@@ -11,10 +11,10 @@
 @z
 
 @x [1] Define my_name
-@d banner=='This is VFtoVP, Version 1.3' {printed when the program starts}
+@d banner=='This is VFtoVP, Version 1.4' {printed when the program starts}
 @y
 @d my_name=='vftovp'
-@d banner=='This is VFtoVP, Version 1.3' {printed when the program starts}
+@d banner=='This is VFtoVP, Version 1.4' {printed when the program starts}
 @z
 
 @x [2] All terminal output goes to stderr, so we can dump the vpl on stdout.
@@ -163,22 +163,6 @@ tfm_file_array
   := cast_to_byte_pointer (xrealloc (tfm_file_array, 4 * lf - 1 + 1002));
 @z
 
-% [25] Both nl and lig_size are in words, so the multiplication is not
-% needed.  Found by "C.M. Connelly" <c@eskimo.com> and
-% Melissa O'Neill <oneill@cs.sfu.ca>
-@x
-if nl>4*lig_size then
-@y
-if nl>lig_size then
-@z
-
-% [25] Add missing space in error message.
-@x
-  bc:1,'..',ec:1,'is illegal!');
-@y
-  bc:1,'..',ec:1,' is illegal!');
-@z
-
 % [31] Ditto for vf_abort.
 @x
 @d vf_abort(#)==
@@ -499,21 +483,6 @@ sixty_four_cases(set_char_0),sixty_four_cases(set_char_0+64),
 begin if o>=set1 then
 @z
 
-@x [129] Bugfix.
-    if o>=put1 then c:=get_bytes(o-put1+1,false)
-    else c:=get_bytes(o-set1+1,false)
-  else c:=o;
-  if f=font_ptr then
-@y
-    if o>=put1 then k:=get_bytes(o-put1+1,false)
-    else k:=get_bytes(o-set1+1,false)
-  else k:=o;
-  c:=k;
-  if (k<0)or(k>255) then
-    bad_vf('Character ',k:1,' is out of range and will be ignored')
-  else if f=font_ptr then
-@z
-
 @x [129] End of block of code moved outside the case statement.
   end;
 @y