summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-11-22 08:45:39 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-11-22 08:45:39 (GMT)
commit0b73c62416cae2c14de0924d798addd849cb5ac2 (patch)
tree3727efd569619f8e4c2500be7fed381c5cea0169 /generic
parent7655c307f652206c12c3b5b2b2dd4953c12c5384 (diff)
downloadtcl-0b73c62416cae2c14de0924d798addd849cb5ac2.zip
tcl-0b73c62416cae2c14de0924d798addd849cb5ac2.tar.gz
tcl-0b73c62416cae2c14de0924d798addd849cb5ac2.tar.bz2
Fix bug reported by Brian Griffin:
<p>[http://code.activestate.com/lists/tcl-core/12524/]
Diffstat (limited to 'generic')
-rw-r--r--generic/tclIndexObj.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/generic/tclIndexObj.c b/generic/tclIndexObj.c
index 1076e32..cc50fd3 100644
--- a/generic/tclIndexObj.c
+++ b/generic/tclIndexObj.c
@@ -207,10 +207,6 @@ Tcl_GetIndexFromObjStruct(interp, objPtr, tablePtr, offset, msg, flags,
entryPtr = NEXT_ENTRY(entryPtr, offset), i++) {
for (p1 = key, p2 = *entryPtr; *p1 == *p2; p1++, p2++) {
if (*p1 == '\0') {
- if (p1 == key) {
- /* empty keys never match */
- continue;
- }
index = i;
goto done;
}