summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2011-06-13 13:48:41 (GMT)
committerdgp <dgp@users.sourceforge.net>2011-06-13 13:48:41 (GMT)
commitb38805471a51d410da8f770ebf78ef0776f4b04f (patch)
treebd8eb2efd964c008522c1d5f9dedadc7f9a27fa3
parent2b5168b50a2657829ffc6687f1f13f87acb053ce (diff)
downloadtcl-b38805471a51d410da8f770ebf78ef0776f4b04f.zip
tcl-b38805471a51d410da8f770ebf78ef0776f4b04f.tar.gz
tcl-b38805471a51d410da8f770ebf78ef0776f4b04f.tar.bz2
3315098 Mem leak fix from Gustaf Neumann.
-rw-r--r--ChangeLog4
-rwxr-xr-xgeneric/tclStrToD.c2
2 files changed, 5 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 4eccf76..294994a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2011-06-13 Don Porter <dgp@users.sourceforge.net>
+
+ * generic/tclStrToD.c: [Bug 3315098] Mem leak fix from Gustaf Neumann.
+
2011-06-02 Don Porter <dgp@users.sourceforge.net>
* generic/tclBasic.c: Removed TclCleanupLiteralTable(), and old
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index e8b7538..421657c 100755
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -3790,7 +3790,7 @@ ShorteningBignumConversion(Double* dPtr,
if (m2plus > m2minus) {
mp_clear(&mplus);
}
- mp_clear_multi(&b, &mminus, &temp, NULL);
+ mp_clear_multi(&b, &mminus, &temp, &dig, &S, NULL);
*s = '\0';
*decpt = k;
if (endPtr) {