... |
... |
@@ -49,20 +49,7 @@ |
49
|
49
|
(assert-equal nil (kernel::random-state-cached-p *test-state*))
|
50
|
50
|
|
51
|
51
|
(dolist (item
|
52
|
|
- ;; Results for xoroshiro128+
|
53
|
|
- #-x86
|
54
|
|
- '((#x18d5f05c086e0086 (#x228f4926843b364d #x74dfe78e715c81be))
|
55
|
|
- (#x976f30b4f597b80b (#x5b6bd4558bd96a68 #x567b7f35650aea8f))
|
56
|
|
- (#xb1e7538af0e454f7 (#x13e5253e242fac52 #xed380e70d10ab60e))
|
57
|
|
- (#x011d33aef53a6260 (#x9d0764952ca00d8a #x5251a5cfedd2b4ef))
|
58
|
|
- (#xef590a651a72c279 (#xba4ef2b425bda963 #x172b965cf56c15ac))
|
59
|
|
- (#xd17a89111b29bf0f (#x458277a5e5f0a21b #xd1bccfad6564e8d))
|
60
|
|
- (#x529e44a0bc46f0a8 (#x2becb68d5a7194c7 #x3a6ec964899bb5f3))
|
61
|
|
- (#x665b7ff1e40d4aba (#xededfd481d0a19fe #x3ea213411827fe9d))
|
62
|
|
- (#x2c9010893532189b (#xd7bb59bcd8fba26f #x52de763d34fee090))
|
63
|
|
- (#x2a99cffa0dfa82ff (#xf96e892c62d6ff2e #xc0542ff85652f81e)))
|
64
|
52
|
;; Results for xoroshiro128**
|
65
|
|
- #+x86
|
66
|
53
|
'((#x41db14eb317141fe (#x16dfbf3d760d0fa4 #xe9bfcf1ce2b9037c))
|
67
|
54
|
(#xaa4ee6e025dfec01 (#xb237e99a3c7ad367 #x96819b1fec0e0432))
|
68
|
55
|
(#xea080e50cb948fa5 (#xcc0fd8226093e0bc #x0e9aeaa496ce50ba))
|
... |
... |
@@ -85,17 +72,12 @@ |
85
|
72
|
:rand 0
|
86
|
73
|
:cached-p nil))
|
87
|
74
|
(dolist (result
|
88
|
|
- ;; Results for xoroshiro128+ jump function
|
89
|
|
- #-x86 '((#x291ddf8e6f6a7b67 #x1f9018a12f9e031f)
|
90
|
|
- (#x88a7aa12158558d0 #xe264d785ab1472d9)
|
91
|
|
- (#x207e16f73c51e7ba #x999c8a0a9a8d87c0)
|
92
|
|
- (#x28f8959d3bcf5ff1 #x38091e563ab6eb98))
|
93
|
75
|
;; Results for xoroshiro128** jump function
|
94
|
|
- #+x86 '((#x19a22191480b0a4e #x43b3d7ee592dd4cf)
|
95
|
|
- (#x76cb87035d0b6e99 #xb6827bcf2ef8267c)
|
96
|
|
- (#x5125201dbdf76860 #x8984c075043869e2)
|
97
|
|
- (#x2c06f0667255309f #xa48cbe2e60fc1d65)
|
98
|
|
- ))
|
|
76
|
+ '((#x19a22191480b0a4e #x43b3d7ee592dd4cf)
|
|
77
|
+ (#x76cb87035d0b6e99 #xb6827bcf2ef8267c)
|
|
78
|
+ (#x5125201dbdf76860 #x8984c075043869e2)
|
|
79
|
+ (#x2c06f0667255309f #xa48cbe2e60fc1d65)
|
|
80
|
+ ))
|
99
|
81
|
(kernel:random-state-jump *test-state*)
|
100
|
82
|
(assert-equal result (multiple-value-list
|
101
|
83
|
(64-bit-rng-state *test-state*)))))
|