From 7b16d3b1d6a8cb9b23b012e4527ee5d9e061aa04 Mon Sep 17 00:00:00 2001 From: Peter Breitenlohner Date: Mon, 20 Jan 2014 11:01:30 +0000 Subject: TeX & Co: New versions from Knuth (TeX tuneup of 2014) git-svn-id: svn://tug.org/texlive/trunk@32727 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/tftopl.ch | 20 ++------------------ 1 file changed, 2 insertions(+), 18 deletions(-) (limited to 'Build/source/texk/web2c/tftopl.ch') diff --git a/Build/source/texk/web2c/tftopl.ch b/Build/source/texk/web2c/tftopl.ch index 8c1644962e9..2d9b1945177 100644 --- a/Build/source/texk/web2c/tftopl.ch +++ b/Build/source/texk/web2c/tftopl.ch @@ -24,10 +24,10 @@ @z @x [1] Define my_name -@d banner=='This is TFtoPL, Version 3.2' {printed when the program starts} +@d banner=='This is TFtoPL, Version 3.3' {printed when the program starts} @y @d my_name=='tftopl' -@d banner=='This is TFtoPL, Version 3.2' {printed when the program starts} +@d banner=='This is TFtoPL, Version 3.3' {printed when the program starts} @z @x [2] Print all terminal output on stderr, so the pl can be sent to stdout. @@ -142,22 +142,6 @@ tfm_file_array := cast_to_byte_pointer (xrealloc (tfm_file_array, 4 * lf - 1 + 1002)); @z -% [21] Both nl and lig_size are in words, so the multiplication is not -% needed. Found by "C.M. Connelly" and -% Melissa O'Neill -@x -if nl>4*lig_size then -@y -if nl>lig_size then -@z - -% [21] Add missing space in error message. -@x - bc:1,'..',ec:1,'is illegal!'); -@y - bc:1,'..',ec:1,' is illegal!'); -@z - % [27, 28] Change strings to C char pointers. The Pascal strings are % indexed starting at 1, so we pad with a blank. @x -- cgit v1.2.3