diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-10-10 19:40:31 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-10-10 19:40:31 (GMT) |
commit | 6ace68f9923e95a70e34993504c7ca901e253224 (patch) | |
tree | 21aaab17fefafdb27d0764cacfae684d2a06b6d1 /generic/tclLiteral.c | |
parent | 17b84171a4c3c3872f23bfea14d7e4c014e988b0 (diff) | |
parent | 7e719795438ad86eff493fcd9f84f325c1a50c99 (diff) | |
download | tcl-6ace68f9923e95a70e34993504c7ca901e253224.zip tcl-6ace68f9923e95a70e34993504c7ca901e253224.tar.gz tcl-6ace68f9923e95a70e34993504c7ca901e253224.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic/tclLiteral.c')
-rw-r--r-- | generic/tclLiteral.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclLiteral.c b/generic/tclLiteral.c index 9051b45..9d89586 100644 --- a/generic/tclLiteral.c +++ b/generic/tclLiteral.c @@ -179,7 +179,7 @@ TclCreateLiteral( const char *bytes, /* The start of the string. Note that this is * not a NUL-terminated string. */ Tcl_Size length, /* Number of bytes in the string. */ - TCL_HASH_TYPE hash, /* The string's hash. If the value is + size_t hash, /* The string's hash. If the value is * TCL_INDEX_NONE, it will be computed here. */ int *newPtr, Namespace *nsPtr, @@ -195,7 +195,7 @@ TclCreateLiteral( * Is it in the interpreter's global literal table? */ - if (hash == (TCL_HASH_TYPE) TCL_INDEX_NONE) { + if (hash == (size_t) TCL_INDEX_NONE) { hash = HashString(bytes, length); } globalHash = (hash & globalTablePtr->mask); |