diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2020-10-07 07:48:56 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2020-10-07 07:48:56 -0700 |
| commit | a1ee6fbb2a2a93b695031fdbf6d8564eae72b42f (patch) | |
| tree | eef0a056c36932080c5bc83f8dd58fc3ad8afdb3 /rand.c | |
| parent | 59f8d2082b2687669d0ec55213776456bfde9506 (diff) | |
| download | txr-a1ee6fbb2a2a93b695031fdbf6d8564eae72b42f.tar.gz txr-a1ee6fbb2a2a93b695031fdbf6d8564eae72b42f.tar.bz2 txr-a1ee6fbb2a2a93b695031fdbf6d8564eae72b42f.zip | |
random: use nanoseconds for seeding.
* rand.c (make_random_state): Use time_sec_nsec to obtain
a time with nanoseconds, instead of time_sec_usec.
Diffstat (limited to 'rand.c')
| -rw-r--r-- | rand.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -166,7 +166,7 @@ val make_random_state(val seed, val warmup) #error port me! #endif } else if (nilp(seed)) { - val time = time_sec_usec(); + val time = time_sec_nsec(); r->state[0] = convert(rand32_t, c_num(car(time), self)); r->state[1] = convert(rand32_t, c_num(cdr(time), self)); #if HAVE_UNISTD_H |