Differences From Artifact [45cdde42d5]:

• File generic/tclHash.c — part of check-in [92cfbef048] at 2012-04-05 09:34:56 on branch trunk — Reduce amount of unreachable code. Refactor Win socket and load code to be less baroque in its internals. (user: dkf size: 29976) [more...]

To Artifact [b7ee4d8147]:

• File generic/tclHash.c — part of check-in [3f693cdfe9] at 2015-09-22 20:57:58 on branch trunk — micro-opt of hash lookups found by drh (user: msofer size: 30002) [more...]

322
323
324
325
326
327
328
329
330
331
332
333
334
335
336

	for (hPtr = tablePtr->buckets[index]; hPtr != NULL;
		hPtr = hPtr->nextPtr) {
#if TCL_HASH_KEY_STORE_HASH
	    if (hash != PTR2UINT(hPtr->hash)) {
		continue;
	    }
#endif
	    if (compareKeysProc((void *) key, hPtr)) {
		if (newPtr) {
		    *newPtr = 0;
		}
		return hPtr;
	    }
	}
    } else {

|

322
323
324
325
326
327
328
329
330
331
332
333
334
335
336

	for (hPtr = tablePtr->buckets[index]; hPtr != NULL;
		hPtr = hPtr->nextPtr) {
#if TCL_HASH_KEY_STORE_HASH
	    if (hash != PTR2UINT(hPtr->hash)) {
		continue;
	    }
#endif
	    if (((void *) key == hPtr) || compareKeysProc((void *) key, hPtr)) {
		if (newPtr) {
		    *newPtr = 0;
		}
		return hPtr;
	    }
	}
    } else {