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.
This commit is contained in:
Philipp Stephani 2023-09-03 16:55:12 +02:00
parent 6e1ee57c8e
commit c799ad42f7

View file

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