diff options
author | dgp <dgp@users.sourceforge.net> | 2011-06-13 13:50:34 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2011-06-13 13:50:34 (GMT) |
commit | a1e02fc1aef789c4ae0fb361985350eff6038f54 (patch) | |
tree | ed24f3eb35d2299b8cb06b262517ae4432e890f2 /generic | |
parent | 16f7aa77f536ccb3a36ed622f482b0a93a1e0db5 (diff) | |
parent | b38805471a51d410da8f770ebf78ef0776f4b04f (diff) | |
download | tcl-a1e02fc1aef789c4ae0fb361985350eff6038f54.zip tcl-a1e02fc1aef789c4ae0fb361985350eff6038f54.tar.gz tcl-a1e02fc1aef789c4ae0fb361985350eff6038f54.tar.bz2 |
3315098 Mem leak fix from Gustaf Neumann.
Diffstat (limited to 'generic')
-rwxr-xr-x | generic/tclStrToD.c | 2 |
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) { |