range needs to be [from .. (to - 1)] not [0 .. (to - from + 1)]

git-svn-id: https://svn.parrot.org/parrot/trunk@44470 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
ashgti · Feb 25, 2010 · a7a6d6f · a7a6d6f
1 parent 468083c
commit a7a6d6f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/utils.c b/src/utils.c
@@ -494,7 +494,7 @@ Parrot_range_rand(INTVAL from, INTVAL to, INTVAL how_random)
     ASSERT_ARGS(Parrot_range_rand)
     const double spread = (double)(to - from + 1);
     const double randpart = Parrot_float_rand(how_random);
-    INTVAL raw = (INTVAL)(spread * randpart);
+    INTVAL raw = from + (INTVAL)(spread * randpart);
 
     /* This shouldn't be necessary since Parrot_float_rand is supposed to
        return a value between [0.0, 1.0), but let's just try to avoid the