X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Ftarget-random.lisp;h=2f7d1a623c68cb2270e2602b15fca5c67f2a5345;hb=65b5ab7e713d04e0d76bc0ee196374f6e57b922f;hp=ca89d4beee4d96e44ec67657d2aae605bd03a13b;hpb=0c05012679ba995e3d70303704b8e1225d4dc5d5;p=sbcl.git

diff --git a/src/code/target-random.lisp b/src/code/target-random.lisp
index ca89d4b..2f7d1a6 100644
--- a/src/code/target-random.lisp
+++ b/src/code/target-random.lisp
@@ -46,7 +46,7 @@
       (format stream "#S(~S ~S #.~S)"
               'random-state
               ':state
-              `(make-array (,(+ 3 mt19937-n))
+              `(make-array ,(+ 3 mt19937-n)
                 :element-type
                 '(unsigned-byte 32)
                 :initial-contents