string.c: negative hash

* string.c (rb_str_hash_m): hash values may be negative.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@56321 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 2 insertions, 2 deletions

diff --git a/string.c b/string.c
index 1c27c89e8b..57b4e9ac15 100644
--- a/string.c
+++ b/string.c
@@ -2964,9 +2964,9 @@ rb_str_hash_m(VALUE str)
 {
     st_index_t hval = rb_str_hash(str);
 #if SIZEOF_LONG == SIZEOF_VOIDP
-    return ULONG2NUM(hval);
+    return LONG2FIX((long)hval);
 #elif SIZEOF_LONG_LONG == SIZEOF_VOIDP
-    return ULL2NUM(hval);
+    return LL2NUM((LONG_LONG)hval);
 #else
 # error unsupported platform
 #endif