bug#13265: 24.2.91; REGRESSION? Warning: misplaced interactive spec

[Leo]

Try compile a file with the following contents:

;;; ---- FILE BEGINS ----
(eval-when-compile (require 'cl))

(defun test ()
  (interactive)
  (declare (special url-http-end-of-headers)))
;;; ---- FILE ENDS ----

I am getting:

  Warning: misplaced interactive spec: `(interactive)'