From dee96209bfbb957538c7adeb01a65f3830749179 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 6 Dec 1999 09:04:03 +0000
Subject: 19991206

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@576 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 bignum.c | 13 +++++--------
 1 file changed, 5 insertions(+), 8 deletions(-)

(limited to 'bignum.c')

diff --git a/bignum.c b/bignum.c
index 05df7c1683..828e0cb9aa 100644
--- a/bignum.c
+++ b/bignum.c
@@ -1255,20 +1255,17 @@ rb_big_abs(x)
 */
 
 VALUE
-rb_big_rand(max)
+rb_big_rand(max, rand)
     VALUE max;
+    double rand;
 {
-    struct RBignum *v;
+    VALUE v;
     long len;
 
     len = RBIGNUM(max)->len;
-    v = RBIGNUM(bignew(len,1));
+    v = bignew(len,1);
     while (len--) {
-#ifdef HAVE_RANDOM
-	BDIGITS(v)[len] = random();
-#else
-	BDIGITS(v)[len] = rand();
-#endif
+	BDIGITS(v)[len] = ((USHORT)~0) * rand;
     }
 
     return rb_big_mod((VALUE)v, max);
-- 
cgit v1.2.3