Subject: Re: bug#62256: 28.2; Invalid edebug spec gv-define-simple-setter

From: Matúš Goljer <[email-masked]>
Date: Sun, 26 Mar 2023 13:28:06 +0200

> Feel free to submit patches for additional specs as well.
>
> Thanks.

I was thinking about the form in `(get 'compiler-macro
'edebug-declaration-spec)` but actually that one is correct.  It's a bit
confusing that top level is always wrapped in () even though that list
wrapper is ignored.

So in the end there's only this one fix.

From f99a7d4423008768d7f0a333fb72fc9cabf446ea Mon Sep 17 00:00:00 2001
From: Matus Goljer <[email-masked]>
Date: Sun, 26 Mar 2023 13:20:19 +0200
Subject: [PATCH] Fix edebug spec for gv-define-simple-setter

---
 lisp/emacs-lisp/gv.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el
index dad91e92a45..ac001af06bd 100644
--- a/lisp/emacs-lisp/gv.el
+++ b/lisp/emacs-lisp/gv.el
@@ -271,7 +271,7 @@ instead the assignment is turned into something equivalent to
     (SETTER ARGS... temp)
     temp)
 so as to preserve the semantics of `setf'."
-  (declare (debug (sexp (&or symbolp lambda-expr) &optional sexp)))
+  (declare (debug (sexp [&or symbolp lambda-expr] &optional sexp)))
   (when (eq 'lambda (car-safe setter))
     (message "Use `gv-define-setter' or name %s's setter function" name))
   `(gv-define-setter ,name (val &rest args)
-- 
2.34.1

-- 
Best regards,
  Matúš Goljer