X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Finterr.lisp;h=2ca905099fd42e996720102bc6ca6e5a9c54fc67;hb=c7de1989d006e0b3a4f26143b7a81c9bdb754101;hp=41247c11075d7f75ec5d6b2099d251d4d21950d1;hpb=d501bef3a93da4f14f1e85b852c2e01ee1df2907;p=sbcl.git

diff --git a/src/code/interr.lisp b/src/code/interr.lisp
index 41247c1..2ca9050 100644
--- a/src/code/interr.lisp
+++ b/src/code/interr.lisp
@@ -283,7 +283,7 @@
 		              (object)
 		      (error 'type-error
 		             :datum object
-		             :expected-type `(simple-array
+		             :expected-type '(simple-array
 					      ,(sb!vm:saetp-specifier saetp)
 					      (*)))))
 		  sb!vm:*specialized-array-element-type-properties*))))