summaryrefslogtreecommitdiff
path: root/Build/source
diff options
context:
space:
mode:
authorLuigi Scarso <luigi.scarso@gmail.com>2017-03-24 00:34:01 +0000
committerLuigi Scarso <luigi.scarso@gmail.com>2017-03-24 00:34:01 +0000
commit61e0a756c8bd5b2b5c5501bffd7a65486f8b1249 (patch)
treea42866621badb6b3316ee495b4d0a6030be65960 /Build/source
parent511d523f9c0456937f392cab51c70f0dcf6ae1bc (diff)
fixed increment of header_last.
git-svn-id: svn://tug.org/texlive/trunk@43591 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source')
-rw-r--r--Build/source/texk/web2c/mplibdir/mp.w10
-rw-r--r--Build/source/texk/web2c/mplibdir/mpmath.w2
-rw-r--r--Build/source/texk/web2c/mplibdir/mpmathdouble.w2
3 files changed, 11 insertions, 3 deletions
diff --git a/Build/source/texk/web2c/mplibdir/mp.w b/Build/source/texk/web2c/mplibdir/mp.w
index adea5f18f17..4d48514a1d7 100644
--- a/Build/source/texk/web2c/mplibdir/mp.w
+++ b/Build/source/texk/web2c/mplibdir/mp.w
@@ -33232,9 +33232,15 @@ We may need to cancel skips that span more than 127 lig/kern steps.
@ The header could contain ASCII zeroes, so can't use |strdup|.
+The index |j| can be beyond the index |header_last|, hence we
+have to sure to update the end of stream marker to reflect the
+actual position.
@<Store a list of header bytes@>=
j--;
+if (mp->header_last<j){
+ mp->header_last=j;
+}
do {
if (j >= mp->header_size) {
size_t l = (size_t) (mp->header_size + (mp->header_size / 4));
@@ -33246,8 +33252,10 @@ do {
mp->header_size = (int) l;
}
mp->header_byte[j] = (char) mp_get_code (mp);
+ if (mp->header_last<j){
+ incr (mp->header_last);
+ }
incr (j);
- incr (mp->header_last);
} while (cur_cmd() == mp_comma)
@ @<Store a list of font dimensions@>=
diff --git a/Build/source/texk/web2c/mplibdir/mpmath.w b/Build/source/texk/web2c/mplibdir/mpmath.w
index 0195d608d85..6c0ee6d00a6 100644
--- a/Build/source/texk/web2c/mplibdir/mpmath.w
+++ b/Build/source/texk/web2c/mplibdir/mpmath.w
@@ -1,4 +1,4 @@
-% $Id: mpmath.w 2070 2015-10-06 10:35:23Z luigi $
+% $Id: mpmath.w 2118 2017-02-15 17:49:54Z luigi $
%
% This file is part of MetaPost;
% the MetaPost program is in the public domain.
diff --git a/Build/source/texk/web2c/mplibdir/mpmathdouble.w b/Build/source/texk/web2c/mplibdir/mpmathdouble.w
index 92339309869..cb14969365f 100644
--- a/Build/source/texk/web2c/mplibdir/mpmathdouble.w
+++ b/Build/source/texk/web2c/mplibdir/mpmathdouble.w
@@ -1,4 +1,4 @@
-% $Id: mpmathdouble.w 2091 2016-09-16 23:07:58Z luigi $
+% $Id: mpmathdouble.w 2118 2017-02-15 17:49:54Z luigi $
%
% This file is part of MetaPost;
% the MetaPost program is in the public domain.