summaryrefslogtreecommitdiffstats
path: root/generic/tclIndexObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <jan.nijtmans@noemail.net>2012-11-22 08:45:39 (GMT)
committerjan.nijtmans <jan.nijtmans@noemail.net>2012-11-22 08:45:39 (GMT)
commit7ed45348b38b2e3a94e990403a3b9854cc9b5922 (patch)
tree3727efd569619f8e4c2500be7fed381c5cea0169 /generic/tclIndexObj.c
parent80d22e97bd20e6525326e676e2d1b65e399f667f (diff)
downloadtcl-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.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;
}