mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 22:41:06 -08:00
Code Issues Projects Releases Wiki Activity

Add a workaround for Bug#42672

Browse source 
* lisp/emacs-lisp/cl-generic.el (cl-defgeneric): Work around Bug#42672
by uniquifying inline method names.

* test/lisp/emacs-lisp/cl-generic-tests.el
(cl-defgeneric/edebug/method): New regression test.
This commit is contained in:
Philipp Stephani 2020-08-02 18:05:36 +02:00
parent 0a65e06020
commit 3e0c3479b2
2 changed files with 46 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/emacs-lisp/cl-generic.el
View file

@ -211,7 +211,16 @@ DEFAULT-BODY, if present, is used as the body of a default method.
[&rest [&or
("declare" &rest sexp)
(":argument-precedence-order" &rest sexp)
(&define ":method" [&rest atom]
(&define ":method"
;; FIXME: The `:unique'
;; construct works around
;; Bug#42672. We'd rather want
;; names like those generated by
;; `cl-defmethod', but that
;; requires larger changes to
;; Edebug.
:unique "cl-generic-:method@"
[&rest atom]
cl-generic-method-args lambda-doc
def-body)]]
def-body)))