10 lines
288 B
Common Lisp
10 lines
288 B
Common Lisp
(random-seed "simon")
|
|
(random (expt 2 32)) → 2275215386
|
|
(random-seed "simon")
|
|
(random (expt 2 32)) → 2275215386 ;; the same
|
|
|
|
|
|
(random-seed (current-time-milliseconds ))
|
|
(random (expt 2 32)) → 4061857345
|
|
(random-seed (current-time-milliseconds ))
|
|
(random (expt 2 32)) → 1322611152
|