diff options
author | dgp <dgp@users.sourceforge.net> | 2011-07-19 19:31:31 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2011-07-19 19:31:31 (GMT) |
commit | 1cee989f7315e650af66b37d9d5a776683255005 (patch) | |
tree | 94cd602dcf7621440e6a3ecbe365cb755ee368d3 /generic/tclUtil.c | |
parent | 5854ebe2233e67143c221199f6ebcdb48dfe748c (diff) | |
parent | d13bc2477fb2656e52a6affd9032ea042707ce87 (diff) | |
download | tcl-1cee989f7315e650af66b37d9d5a776683255005.zip tcl-1cee989f7315e650af66b37d9d5a776683255005.tar.gz tcl-1cee989f7315e650af66b37d9d5a776683255005.tar.bz2 |
3371644 Repair failure to properly handle (length == -1) in TclConvertElement().
Diffstat (limited to 'generic/tclUtil.c')
-rw-r--r-- | generic/tclUtil.c | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/generic/tclUtil.c b/generic/tclUtil.c index 55103e3..51508d2 100644 --- a/generic/tclUtil.c +++ b/generic/tclUtil.c @@ -1261,9 +1261,7 @@ int TclConvertElement( p[1] = '#'; p += 2; src++; - if (length > 0) { - length--; - } + length -= (length > 0); } else { conversion = CONVERT_BRACE; } |