summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2015-01-13 07:51:59 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2015-01-13 07:51:59 +0000
commit12194c45e36694006921819c50e566e4e384dce2 (patch)
treefe1d11cff2708a7730ae15fefc27a100c8a507d8
parentb83822f4ed06282c5c503ef4cf2534646208090a (diff)
METAFONT: Ignore ^Z in input files
git-svn-id: svn://tug.org/texlive/trunk@36046 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Build/source/texk/web2c/ChangeLog4
-rw-r--r--Build/source/texk/web2c/mf.ch2
2 files changed, 6 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/ChangeLog b/Build/source/texk/web2c/ChangeLog
index 388b86de177..7a8b9bb277a 100644
--- a/Build/source/texk/web2c/ChangeLog
+++ b/Build/source/texk/web2c/ChangeLog
@@ -1,3 +1,7 @@
+2015-01-13 Peter Breitenlohner <peb@mppmu.mpg.de>
+
+ * mf.ch: Ignore ^Z in input files (as tab and form_feed).
+
2015-01-12 Peter Breitenlohner <peb@mppmu.mpg.de>
* tftopl.ch, vftovp.ch: Use ^byte and x*alloc_array().
diff --git a/Build/source/texk/web2c/mf.ch b/Build/source/texk/web2c/mf.ch
index ec804166c09..8987d2e1470 100644
--- a/Build/source/texk/web2c/mf.ch
+++ b/Build/source/texk/web2c/mf.ch
@@ -228,6 +228,7 @@ for i:=@'177 to @'377 do xchr[i]:=' ';
@d tab = @'11 { ASCII horizontal tab }
@d form_feed = @'14 { ASCII form feed }
+@d control_z = @'32 { Windows EOF and Unix Suspend }
@<Set init...@>=
{Initialize |xchr| to the identity mapping.}
@@ -1133,6 +1134,7 @@ for k:=127 to 255 do char_class[k]:=invalid_class;
for k:=127 to 255 do char_class[k]:=invalid_class;
char_class[tab]:=space_class;
char_class[form_feed]:=space_class;
+char_class[control_z]:=space_class;
@z
@x [232] Use halfp.