From 9d75fa0e5e8083df3243de2696ce327f1037fd93 Mon Sep 17 00:00:00 2001 From: Akira Kakuto Date: Mon, 16 May 2022 20:43:45 +0000 Subject: luatex, metapost: sync with the upstream git-svn-id: svn://tug.org/texlive/trunk@63314 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/luatexdir/ChangeLog | 3 +++ Build/source/texk/web2c/luatexdir/luatex_svnversion.h | 2 +- Build/source/texk/web2c/mplibdir/mp.w | 10 ++++++++++ 3 files changed, 14 insertions(+), 1 deletion(-) (limited to 'Build/source/texk') diff --git a/Build/source/texk/web2c/luatexdir/ChangeLog b/Build/source/texk/web2c/luatexdir/ChangeLog index 384a884df9d..98bf305cfa6 100644 --- a/Build/source/texk/web2c/luatexdir/ChangeLog +++ b/Build/source/texk/web2c/luatexdir/ChangeLog @@ -1,3 +1,6 @@ +2022-05-15 Luigi Scarso + * Fixed a memory leak in mplib (H.Hagen) + 2022-04-26 Luigi Scarso * \mathitalicsmode=2 (enforce old school fonts italics code path) (H.Hagen) diff --git a/Build/source/texk/web2c/luatexdir/luatex_svnversion.h b/Build/source/texk/web2c/luatexdir/luatex_svnversion.h index 431ba5a873f..03da6264fe3 100644 --- a/Build/source/texk/web2c/luatexdir/luatex_svnversion.h +++ b/Build/source/texk/web2c/luatexdir/luatex_svnversion.h @@ -1,4 +1,4 @@ #ifndef luatex_svn_revision_h #define luatex_svn_revision_h -#define luatex_svn_revision 7525 +#define luatex_svn_revision 7526 #endif diff --git a/Build/source/texk/web2c/mplibdir/mp.w b/Build/source/texk/web2c/mplibdir/mp.w index 427d1e17f71..099004e36c0 100644 --- a/Build/source/texk/web2c/mplibdir/mp.w +++ b/Build/source/texk/web2c/mplibdir/mp.w @@ -7659,6 +7659,14 @@ void mp_toss_knot (MP mp, mp_knot q) { q->next = mp->knot_nodes; mp->knot_nodes = q; mp->num_knot_nodes++; + if (mp->math_mode > mp_math_double_mode) { + free_number (q->x_coord); + free_number (q->y_coord); + free_number (q->left_x); + free_number (q->left_y); + free_number (q->right_x); + free_number (q->right_y); + } return; } if (mp->math_mode > mp_math_double_mode) { @@ -7667,6 +7675,8 @@ void mp_toss_knot (MP mp, mp_knot q) { mp_xfree (q); } } + + void mp_toss_knot_list (MP mp, mp_knot p) { mp_knot q; /* the node being freed */ mp_knot r; /* the next node */ -- cgit v1.2.3