From 3e3423bce40b586485d6f2300add7520755e8e08 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Daniel=20Kochma=C5=84ski?= Date: Mon, 21 Sep 2015 10:30:07 +0200 Subject: [PATCH] random: add comment for 64 rng MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Signed-off-by: Daniel Kochmański --- src/c/num_rand.d | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/c/num_rand.d b/src/c/num_rand.d index ac5eb79..9c53cac 100644 --- a/src/c/num_rand.d +++ b/src/c/num_rand.d @@ -211,6 +211,9 @@ ecl_make_random_state(cl_object rs) z->random.value = cl_copy_seq(rs->random.value); break; case t_fixnum: + /* XXX: If we'll decide to use 64-bit algorithm for + appropriate platforms then this will be replaced + with ecl_to_ulong_long from number.d*/ z->random.value = init_genrand (ecl_to_uint32_t(rs)); break; -- 2.9.0