diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2012-11-19 22:08:35 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2012-11-19 22:08:35 (GMT) |
| commit | 25f2c03d591234cedcf563e337feb38c969f511f (patch) | |
| tree | 9790caf5f3e563afb49a9b98f35fe6c8f92fb8df /generic/tclExecute.c | |
| parent | 9db99fc857ce0bb38b9f0fd5644fcec33df7e0ee (diff) | |
| download | tcl-25f2c03d591234cedcf563e337feb38c969f511f.zip tcl-25f2c03d591234cedcf563e337feb38c969f511f.tar.gz tcl-25f2c03d591234cedcf563e337feb38c969f511f.tar.bz2 | |
[Bug 3588366]: Corrected implementation of bounds restriction for end-indexed
compiled [string range]. Thanks to Emiliano Gavilan for diagnosis and fix.
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index cf8f9e7..2b5f713 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -4962,9 +4962,6 @@ TEBCresume( } if (toIdx < -1) { toIdx += 1 + length; - if (toIdx < 0) { - toIdx = 0; - } } else if (toIdx >= length) { toIdx = length - 1; } |