From be17d9f487f3cedaa1e8671f599635d641c807f7 Mon Sep 17 00:00:00 2001
From: Raymond Toy <toy.raymond@gmail.com>
Date: Tue, 19 Dec 2017 19:01:35 -0800
Subject: [PATCH] Conditionalize on random-xoroshiro.

These tests test the actual implementation details of the
xoroshiro128+ generator, so conditionalize it for this generator.
---
 tests/rng.lisp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tests/rng.lisp b/tests/rng.lisp
index 5d914873f..e48dc4519 100644
--- a/tests/rng.lisp
+++ b/tests/rng.lisp
@@ -20,6 +20,7 @@
 
 (defvar *test-state*)
   
+#+random-xoroshiro
 (define-test rng.initial-state
   (setf *test-state*
 	(kernel::make-random-object :state (kernel::init-random-state #x12345678)
@@ -33,6 +34,7 @@
     (assert-equal nil (kernel::random-state-cached-p *test-state*))))
 
 
+#+random-xoroshiro
 (define-test rng.values-test
   (assert-equal (list #x38f1dc39d1906b6f #xdfe4142236dd9517)
 		(multiple-value-list (64-bit-rng-state *test-state*)))
-- 
GitLab