diff options
Diffstat (limited to 'Build/source/texk/web2c/ptexdir')
-rw-r--r-- | Build/source/texk/web2c/ptexdir/ChangeLog | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/ptexdir/ptftopl.ch | 8 |
2 files changed, 8 insertions, 4 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ChangeLog b/Build/source/texk/web2c/ptexdir/ChangeLog index 0afc80cd4ac..9178981ae70 100644 --- a/Build/source/texk/web2c/ptexdir/ChangeLog +++ b/Build/source/texk/web2c/ptexdir/ChangeLog @@ -1,3 +1,7 @@ +2015-01-12 Peter Breitenlohner <peb@mppmu.mpg.de> + + * ptftopl.ch: Use ^byte and xmalloc_array(). + 2014-12-12 Peter Breitenlohner <peb@mppmu.mpg.de> * ptriptest: Complain early if trip.fmt is not created. diff --git a/Build/source/texk/web2c/ptexdir/ptftopl.ch b/Build/source/texk/web2c/ptexdir/ptftopl.ch index 57dffda83d0..302b2d2f69c 100644 --- a/Build/source/texk/web2c/ptexdir/ptftopl.ch +++ b/Build/source/texk/web2c/ptexdir/ptftopl.ch @@ -26,9 +26,9 @@ var @!k:integer; {all-purpose initiallization index} @z @x [2] l.97 - pTeX: - tfm_file_array := cast_to_byte_pointer (xmalloc (1003)); + tfm_file_array := xmalloc_array (byte, 1002); @y - tfm_file_array := cast_to_byte_pointer (xmalloc (1003+4)); + tfm_file_array := xmalloc_array (byte, 1002 + 4); @z @x @@ -57,9 +57,9 @@ var @!k:integer; {all-purpose initiallization index} @z @x [18.20] l.448 - pTeX: -@!tfm_file_array: pointer_to_byte; {the input data all goes here} +@!tfm_file_array: ^byte; {the input data all goes here} @y -@!tfm_file_array: pointer_to_byte; {the input data all goes here} +@!tfm_file_array: ^byte; {the input data all goes here} @!file_format:tfm_format..vfm_format; {format of tfm file} @!nt:0..@'77777; {number of words in the character type table} @!ng:0..@'77777; {number of words in the glue table} |