declaration treated as a type when used with a parameter.

[stassats]

(declaim (declaration x))

(compile nil `(lambda (a) (declare (x a)) a))

; caught STYLE-WARNING:
;   STYLE-WARNING during compiler-macro-expansion:
;     Undefined type X
;     at unknown location