From d902a27aeabe00dffc72f94bd591db15f109226e Mon Sep 17 00:00:00 2001 From: nobu Date: Fri, 10 Jul 2009 17:37:52 +0000 Subject: * 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 --- random.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'random.c') 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; -- cgit