From: Philipp Stephani Date: Sun, 3 Sep 2023 14:55:12 +0000 (+0200) Subject: Fix Edebug specification for 'cl-define-compiler-macro'. X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c799ad42f705f64975771e181dee29e1d0ebe97a;p=emacs.git Fix Edebug specification for 'cl-define-compiler-macro'. * lisp/emacs-lisp/cl-macs.el (cl-define-compiler-macro): Give the instrumented name a suffix to make it unique. Otherwise it will clash with the name of the main function. --- diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 4cc43995c12..850fbc69180 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -3587,7 +3587,8 @@ possible. Unlike regular macros, BODY can decide to \"punt\" and leave the original function call alone by declaring an initial `&whole foo' parameter and then returning foo." ;; Like `cl-defmacro', but with the `&whole' special case. - (declare (debug (&define name cl-macro-list + (declare (debug (&define [&name symbolp "@cl-compiler-macro"] + cl-macro-list cl-declarations-or-string def-body)) (indent 2)) (let ((p args) (res nil))