emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master c799ad42f70: Fix Edebug specification for 'cl-define-compiler-mac


From: Philipp Stephani
Subject: master c799ad42f70: Fix Edebug specification for 'cl-define-compiler-macro'.
Date: Sun, 3 Sep 2023 10:56:52 -0400 (EDT)

branch: master
commit c799ad42f705f64975771e181dee29e1d0ebe97a
Author: Philipp Stephani <phst@google.com>
Commit: Philipp Stephani <phst@google.com>

    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.
---
 lisp/emacs-lisp/cl-macs.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]