summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAkira Kakuto <kakuto@fuk.kindai.ac.jp>2022-05-16 20:43:45 +0000
committerAkira Kakuto <kakuto@fuk.kindai.ac.jp>2022-05-16 20:43:45 +0000
commit9d75fa0e5e8083df3243de2696ce327f1037fd93 (patch)
tree88dfe481c83d01df9f5d4d2e18042a0ee068a31c
parent11dee93a70aa0e33fc86c94d9893c7dffa2a5aac (diff)
luatex, metapost: sync with the upstream
git-svn-id: svn://tug.org/texlive/trunk@63314 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Build/source/texk/web2c/luatexdir/ChangeLog3
-rw-r--r--Build/source/texk/web2c/luatexdir/luatex_svnversion.h2
-rw-r--r--Build/source/texk/web2c/mplibdir/mp.w10
3 files changed, 14 insertions, 1 deletions
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 <luigi.scarso@gmail.com>
+ * Fixed a memory leak in mplib (H.Hagen)
+
2022-04-26 Luigi Scarso <luigi.scarso@gmail.com>
* \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 */