diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-22 08:47:37 (GMT) | 
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-22 08:47:37 (GMT) | 
| commit | 888f7141151b5b085d0cdc0029121d67a06e7273 (patch) | |
| tree | fdf693839484bb74c4ea5b6b5b1e34f6658d50f4 /generic/tclIndexObj.c | |
| parent | 10dd9595a33e80ac7ab8ae5ff11b6b6ef3059b20 (diff) | |
| parent | 0b73c62416cae2c14de0924d798addd849cb5ac2 (diff) | |
| download | tcl-888f7141151b5b085d0cdc0029121d67a06e7273.zip tcl-888f7141151b5b085d0cdc0029121d67a06e7273.tar.gz tcl-888f7141151b5b085d0cdc0029121d67a06e7273.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 2d87205..944fb8e 100644 --- a/generic/tclIndexObj.c +++ b/generic/tclIndexObj.c @@ -202,10 +202,6 @@ Tcl_GetIndexFromObjStruct(  	    entryPtr = NEXT_ENTRY(entryPtr, offset), idx++) {  	for (p1 = key, p2 = *entryPtr; *p1 == *p2; p1++, p2++) {  	    if (*p1 == '\0') { -		if (p1 == key) { -		    /* empty keys never match */ -		    continue; -		}  		index = idx;  		goto done;  	    }  | 
