diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-22 08:45:39 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-22 08:45:39 (GMT) |
| commit | 0b73c62416cae2c14de0924d798addd849cb5ac2 (patch) | |
| tree | 3727efd569619f8e4c2500be7fed381c5cea0169 /generic/tclIndexObj.c | |
| parent | 7655c307f652206c12c3b5b2b2dd4953c12c5384 (diff) | |
| download | tcl-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/tclIndexObj.c')
| -rw-r--r-- | generic/tclIndexObj.c | 4 |
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; } |