diff options
author | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-11-22 08:45:39 (GMT) |
---|---|---|
committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2012-11-22 08:45:39 (GMT) |
commit | 7ed45348b38b2e3a94e990403a3b9854cc9b5922 (patch) | |
tree | 3727efd569619f8e4c2500be7fed381c5cea0169 /generic/tclIndexObj.c | |
parent | 80d22e97bd20e6525326e676e2d1b65e399f667f (diff) | |
download | tcl-7ed45348b38b2e3a94e990403a3b9854cc9b5922.zip tcl-7ed45348b38b2e3a94e990403a3b9854cc9b5922.tar.gz tcl-7ed45348b38b2e3a94e990403a3b9854cc9b5922.tar.bz2 |
Fix bug reported by Brian Griffin:
<p>[http://code.activestate.com/lists/tcl-core/12524/]
FossilOrigin-Name: b8a089f6e458605f83e7eb1cfc5c82b5ce75337b
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; } |