summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2013-01-04 15:01:57 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2013-01-04 15:01:57 (GMT)
commita2640e1242a6bda25202eb5d73b7cc6a5fa239ef (patch)
tree9f55ef6c9fa5893b5c46870f007b523da60b8c62 /generic
parent18d9d66f4d3a6a8b468474e25d5bacee500bda85 (diff)
downloadtcl-a2640e1242a6bda25202eb5d73b7cc6a5fa239ef.zip
tcl-a2640e1242a6bda25202eb5d73b7cc6a5fa239ef.tar.gz
tcl-a2640e1242a6bda25202eb5d73b7cc6a5fa239ef.tar.bz2
Fix memory leak in [format] compiler.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclCompCmds.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompCmds.c b/generic/tclCompCmds.c
index 8fa191b..752db93 100644
--- a/generic/tclCompCmds.c
+++ b/generic/tclCompCmds.c
@@ -3082,7 +3082,7 @@ TclCompileFormatCmd(
* after our attempt to spot a literal).
*/
- for (; --i>=0 ;) {
+ for (; i>=0 ; i--) {
Tcl_DecrRefCount(objv[i]);
}
ckfree(objv);