diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2013-01-05 18:16:06 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2013-01-05 18:16:06 (GMT) |
| commit | d15f69c7cd80b92655fcab43b3c7e6f20b469e0b (patch) | |
| tree | a526629db720d56fb03f755be004c02ed6b97d35 /generic/tclCompCmds.c | |
| parent | ca80fd1ef029e9a02b25b6226792be1cbf77edf3 (diff) | |
| parent | 1eab18224415dee330bf92af02a46d790abe812b (diff) | |
| download | tcl-d15f69c7cd80b92655fcab43b3c7e6f20b469e0b.zip tcl-d15f69c7cd80b92655fcab43b3c7e6f20b469e0b.tar.gz tcl-d15f69c7cd80b92655fcab43b3c7e6f20b469e0b.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclCompCmds.c')
| -rw-r--r-- | generic/tclCompCmds.c | 2 |
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); |