Commit d8e443a8 authored by pfdietz's avatar pfdietz
Browse files

Have each iteration work on a different random state,

parent 4124c914
...@@ -9,6 +9,7 @@ ...@@ -9,6 +9,7 @@
(deftest print.random-state.1 (deftest print.random-state.1
(loop repeat 100 (loop repeat 100
do (loop repeat 50 do (random 1000))
nconc nconc
(let* ((rs1 (make-random-state *random-state*)) (let* ((rs1 (make-random-state *random-state*))
(rs2 (with-standard-io-syntax (rs2 (with-standard-io-syntax
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment