Subject: defmacro* does not process declare options

From: Juanma Barranquero <[email-masked]>
Date: Sat, 24 Nov 2012 04:39:44 +0100

Package: emacs
Version: 24.2.50

This is a regression in 24.3

  emacs -Q

and evaluate

(let (sp1 sp2)
  (require 'cl)
  (setf (symbol-plist 'whereas) nil)
  (makunbound 'whereas)
  (defmacro* whereas ((var test) &rest body)
    (declare (indent 1))
    `(let ((,var ,test)) (when ,var ,@body)))
  (setq sp1 (symbol-plist 'whereas))
  (defmacro whereas (var test &rest body)
    (declare (indent 1))
    `(let ((var ,test)) (when ,var ,@body)))
  (setq sp2 (symbol-plist 'whereas))
  (list sp1 sp2))

24.2 => ((lisp-indent-function 1) (lisp-indent-function 1))
24.2.50 => (nil (lisp-indent-function 1))

    Juanma