Fix make-array transforms.

[sbcl.git] / tests / bug-doug-mcnaught-20030914.lisp

diff --git a/tests/bug-doug-mcnaught-20030914.lisp b/tests/bug-doug-mcnaught-20030914.lisp
index 6c4a8e2..1b14dd6 100644 (file)
--- a/tests/bug-doug-mcnaught-20030914.lisp
+++ b/tests/bug-doug-mcnaught-20030914.lisp
@@ -4,7 +4,7 @@
   (set-macro-character #\] (get-macro-character #\)))
 
   (set-dispatch-macro-character #\# #\[
-                               #'(lambda (s c n) (declare (ignore c))
+                                #'(lambda (s c n) (declare (ignore c))
                                     (let* ((type (if n `(unsigned-byte ,n)
                                                    '(unsigned-byte 8)))
                                            (list (read-delimited-list #\] s nil))