* random.c (limited_rand): expands to long before shift so that

  the result does not overflow.


git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@24029 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 2 insertions, 2 deletions

diff --git a/random.c b/random.c
index 3ae919727..bcc16aa5b 100644
--- a/random.c
+++ b/random.c
@@ -414,8 +414,8 @@ limited_rand(struct MT *mt, unsigned long limit)
   retry:
     val = 0;
     for (i = SIZEOF_LONG/4-1; 0 <= i; i--) {
-        if (mask >> (i * 32)) {
-            val |= genrand_int32(mt) << (i * 32);
+        if ((mask >> (i * 32)) & 0xffffffff) {
+            val |= (unsigned long)genrand_int32(mt) << (i * 32);
             val &= mask;
             if (limit < val)
                 goto retry;