# Paul Hsieh's SuperFastHash
# http://www.azillionmonkeys.com/qed/hash.html
-# Ported from UString..
sub hashValue($) {
my @chars = split(/ */, $_[0]);
}
# Handle end case
- if ($rem !=0) {
+ if ($rem != 0) {
$hash += ord($chars[$s]);
$hash ^= (leftShift($hash, 11)% $EXP2_32);
$hash += $hash >> 17;
$hash += ($hash >> 15);
$hash = $hash% $EXP2_32;
$hash ^= (leftShift($hash, 10)% $EXP2_32);
-
- # this avoids ever returning a hash code of 0, since that is used to
- # signal "hash not computed yet", using a value that is likely to be
- # effectively the same as 0 when the low bits are masked
- $hash = 0x80000000 if ($hash == 0);
+
+ # Save 8 bits for StringImpl to use as flags.
+ $hash &= 0xffffff;
+
+ # This avoids ever returning a hash code of 0, since that is used to
+ # signal "hash not computed yet". Setting the high bit maintains
+ # reasonable fidelity to a hash code of 0 because it is likely to yield
+ # exactly 0 when hash lookup masks out the high bits.
+ $hash = (0x80000000 >> 8) if ($hash == 0);
return $hash;
}
print " { 0, 0, 0, 0 THUNK_GENERATOR(0) INTRINSIC(DFG::NoIntrinsic) }\n";
print "};\n\n";
print "#undef THUNK_GENERATOR\n";
- print "extern JSC_CONST_HASHTABLE HashTable $name =\n";
+ print "extern const struct HashTable $name =\n";
print " \{ $compactSize, $compactHashSizeMask, $nameEntries, 0 \};\n";
print "} // namespace\n";
}