Repositories / ecl.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 07ad0fc)
random: add comment for 64 rng
authorDaniel Kochmański <dkochmanski@turtle-solutions.eu>
Mon, 21 Sep 2015 08:30:07 +0000 (10:30 +0200)
committerDaniel Kochmański <dkochmanski@turtle-solutions.eu>
Mon, 21 Sep 2015 08:30:07 +0000 (10:30 +0200)
Signed-off-by: Daniel Kochmański <dkochmanski@turtle-solutions.eu>
src/c/num_rand.d patch | blob | blame | history

diff --git a/src/c/num_rand.d b/src/c/num_rand.d
index ac5eb79..9c53cac 100644 (file)
--- 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;
Embeddable Common Lisp (Official: https://gitlab.com/embeddable-common-lisp/ecl)