* arith.c (highest_bit): Changing to external linkage.

* arith.h (highest_bit): Declared.

* rand.c (random): Rewrote using different algorithm which
ensures even distribution, and avoids doing a bignum mod
operation.

1 files changed, 1 insertions, 1 deletions

diff --git a/arith.c b/arith.c
index e7290bfc..6f19a63e 100644
--- a/arith.c
+++ b/arith.c
@@ -84,7 +84,7 @@ val normalize(val bignum)
   }
 }
 
-static int highest_bit(int_ptr_t n)
+int highest_bit(int_ptr_t n)
 {
 #if SIZEOF_PTR == 8
   if (n & 0x7FFFFFFF00000000) {