From d72114fcce59d6069209a95080fc8ff1d5b3ab59 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Tue, 9 Sep 2008 15:46:14 -0500
Subject: [PATCH] wrap -> mod again

---
 basis/random/random.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/random/random.factor b/basis/random/random.factor
index 6332d7cf8c..c1dd146206 100755
--- a/basis/random/random.factor
+++ b/basis/random/random.factor
@@ -39,7 +39,7 @@ M: f random-32* ( obj -- * ) no-random-number-generator ;
             length [
                 log2 8 + 8 /i
                 random-bytes byte-array>bignum
-            ] keep wrap
+            ] keep mod
         ] keep nth
     ] if-empty ;