summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorhobbs <hobbs>2002-11-12 02:23:18 (GMT)
committerhobbs <hobbs>2002-11-12 02:23:18 (GMT)
commit91f842ece502c62caf6d1d4db96d873721f6fe66 (patch)
tree671a4cc8bb58ea9e0450252acf9e41333c9c84f7 /generic
parent7ce004a3935aa864f28fb33d208aef563eea9ad8 (diff)
downloadtcl-91f842ece502c62caf6d1d4db96d873721f6fe66.zip
tcl-91f842ece502c62caf6d1d4db96d873721f6fe66.tar.gz
tcl-91f842ece502c62caf6d1d4db96d873721f6fe66.tar.bz2
* generic/tclHash.c (HashStringKey): move string++ lower to save
an instruction.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclHash.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclHash.c b/generic/tclHash.c
index e7bd472..45726d9 100644
--- a/generic/tclHash.c
+++ b/generic/tclHash.c
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclHash.c,v 1.11 2002/02/26 02:16:09 hobbs Exp $
+ * RCS: @(#) $Id: tclHash.c,v 1.12 2002/11/12 02:23:18 hobbs Exp $
*/
#include "tclInt.h"
@@ -1019,11 +1019,11 @@ HashStringKey(tablePtr, keyPtr)
result = 0;
while (1) {
c = *string;
- string++;
if (c == 0) {
break;
}
result += (result<<3) + c;
+ string++;
}
return result;
}