diff --git a/deflate-test.lisp b/deflate-test.lisp
index 7c10923..07c133c 100644
--- a/deflate-test.lisp
+++ b/deflate-test.lisp
@@ -68,7 +68,7 @@
 ;;;
 
 (defclass octet-input-stream (fundamental-binary-input-stream)
-  ((data :initarg :data :type (simple-array (*) (unsigned-byte 8)))
+  ((data :initarg :data :type (simple-array (unsigned-byte 8) (*)))
    (position :initform 0)))
 
 (defmethod stream-element-type ((stream octet-input-stream))