texlive[42931] Build/source/texk/web2c/mplibdir/mp.w: mplibdir/mp.w:

[commits+kakuto at tug.org]

Revision: 42931
          http://tug.org/svn/texlive?view=revision&revision=42931
Author:   kakuto
Date:     2017-01-12 03:24:44 +0100 (Thu, 12 Jan 2017)
Log Message:
-----------
mplibdir/mp.w: sync with the upstream

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/mplibdir/mp.w

Modified: trunk/Build/source/texk/web2c/mplibdir/mp.w
===================================================================
--- trunk/Build/source/texk/web2c/mplibdir/mp.w	2017-01-12 01:05:33 UTC (rev 42930)
+++ trunk/Build/source/texk/web2c/mplibdir/mp.w	2017-01-12 02:24:44 UTC (rev 42931)
@@ -1,4 +1,4 @@
-% $Id: mp.w 2112 2017-01-09 18:44:19Z luigi $
+% $Id: mp.w 2113 2017-01-11 23:15:32Z luigi $
 %
 % This file is part of MetaPost;
 % the MetaPost program is in the public domain.
@@ -29189,11 +29189,11 @@
   qq = mp_make_envelope(mp, q, value_knot (p), ljoin, lcap, miterlim);
   set_cur_exp_knot (qq);
   mp->cur_exp.type = mp_path_type;
+
   if (!mp_get_cur_bbox (mp)) {
       mp_bad_binary (mp, p, mp_boundingpath_of);
       set_cur_exp_knot (q);
       mp->cur_exp.type = mp_path_type;
-      mp_free_path(mp,qq);
       return;
   }
   else {
@@ -29206,7 +29206,6 @@
         mp_bad_binary (mp, p, mp_boundingpath_of);
         set_cur_exp_knot (q);
         mp->cur_exp.type = mp_path_type;
-        mp_free_path(mp,qq);
         return;
       }
       mp_left_type (ll) = mp_endpoint;