summaryrefslogtreecommitdiffstats
path: root/generic/tclStrToD.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2011-06-13 13:50:34 (GMT)
committerdgp <dgp@users.sourceforge.net>2011-06-13 13:50:34 (GMT)
commita1e02fc1aef789c4ae0fb361985350eff6038f54 (patch)
treeed24f3eb35d2299b8cb06b262517ae4432e890f2 /generic/tclStrToD.c
parent16f7aa77f536ccb3a36ed622f482b0a93a1e0db5 (diff)
parentb38805471a51d410da8f770ebf78ef0776f4b04f (diff)
downloadtcl-a1e02fc1aef789c4ae0fb361985350eff6038f54.zip
tcl-a1e02fc1aef789c4ae0fb361985350eff6038f54.tar.gz
tcl-a1e02fc1aef789c4ae0fb361985350eff6038f54.tar.bz2
3315098 Mem leak fix from Gustaf Neumann.
Diffstat (limited to 'generic/tclStrToD.c')
-rwxr-xr-xgeneric/tclStrToD.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index 59192e9..16f11d2 100755
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -3820,7 +3820,7 @@ ShorteningBignumConversion(
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) {