summaryrefslogtreecommitdiffstats
path: root/generic/tclHash.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclHash.c')
-rw-r--r--generic/tclHash.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclHash.c b/generic/tclHash.c
index 7e1b3e0..10e3027 100644
--- a/generic/tclHash.c
+++ b/generic/tclHash.c
@@ -770,14 +770,14 @@ HashArrayKey(
void *keyPtr) /* Key from which to compute hash value. */
{
const int *array = (const int *) keyPtr;
- unsigned int result;
+ TCL_HASH_TYPE result;
int count;
for (result = 0, count = tablePtr->keyType; count > 0;
count--, array++) {
result += *array;
}
- return (TCL_HASH_TYPE) result;
+ return result;
}
/*
@@ -868,7 +868,7 @@ HashStringKey(
void *keyPtr) /* Key from which to compute hash value. */
{
const char *string = (const char *)keyPtr;
- unsigned int result;
+ TCL_HASH_TYPE result;
char c;
(void)tablePtr;
@@ -909,7 +909,7 @@ HashStringKey(
result += (result << 3) + UCHAR(c);
}
}
- return (TCL_HASH_TYPE) result;
+ return result;
}
/*