diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-11-19 22:08:35 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-11-19 22:08:35 (GMT) |
| commit | 094f23c172acca8f32b0888cd536f01fc1daab1b (patch) | |
| tree | 9790caf5f3e563afb49a9b98f35fe6c8f92fb8df /generic/tclExecute.c | |
| parent | 2bf2abcb4f1c88fbddc3ce4d5800c438851aaf95 (diff) | |
| download | tcl-094f23c172acca8f32b0888cd536f01fc1daab1b.zip tcl-094f23c172acca8f32b0888cd536f01fc1daab1b.tar.gz tcl-094f23c172acca8f32b0888cd536f01fc1daab1b.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; } |