diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2014-01-23 12:49:22 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2014-01-23 12:49:22 +0000 |
commit | cce7ef6b16baffd93860a40a634d23f8447a4d7e (patch) | |
tree | f421a9f4277e2b8587282c496661e5d12a5caf43 /Build/source/texk/web2c/ptexdir/ptftopl.ch | |
parent | 2a625df2d1f705b6ba8486a3e93ff161099e88e4 (diff) |
web2c: Minor cleanup
git-svn-id: svn://tug.org/texlive/trunk@32767 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/ptexdir/ptftopl.ch')
-rw-r--r-- | Build/source/texk/web2c/ptexdir/ptftopl.ch | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ptftopl.ch b/Build/source/texk/web2c/ptexdir/ptftopl.ch index 565715d5c29..57dffda83d0 100644 --- a/Build/source/texk/web2c/ptexdir/ptftopl.ch +++ b/Build/source/texk/web2c/ptexdir/ptftopl.ch @@ -264,7 +264,7 @@ if file_format<>tfm_format then tfm_format: print('Ligature/kern '); @.Ligature/kern starting index...@> jfm_format,vfm_format: print('Glue/kern '); -@.Glue/kern index starging index...@> +@.Glue/kern starting index...@> end; print('starting index for character '); print_octal(c); print_ln(' is too large;'); print_ln('so I removed it.'); reset_tag(c); @@ -273,9 +273,8 @@ if file_format<>tfm_format then @x [76] l.1179 - pTeX: if kanji format, output a glue step not a ligature step else @<Output a ligature step@>; @y -else if file_format=tfm_format then @<Output a ligature step@> -else if (file_format=jfm_format)or(file_format=vfm_format) then - @<Output a glue step@>; +else if file_format<>tfm_format then @<Output a glue step@> +else @<Output a ligature step@>; @z @x [78] l.1238 - pTeX: @@ -435,7 +434,7 @@ else end; right; end; -end; +end @ list the |char_type| table in a similar way to the type table |