bug#40432: 27.0.90; Edebug not possible if a cl-flet has an &optional argument

[Lars Ingebrigtsen]

Philipp Stephani <p.stephani2@gmail.com> writes:

> Insert into *scratch*:
>
> (defun foo ()
>   (cl-flet ((bar (&optional qux) qux))
>     (bar 123)))
>
> Try to edebug this function (move point into it, hit C-u C-M-x).  This
> gives an error:
>
> Debugger entered--Lisp error: (wrong-number-of-arguments (2 . 2) 1)
>   edebug-match-&optional(((qux) (188 . 191) . 192))

I can reproduce this in Emacs 27.1, but not in Emacs 28.  This was
apparently fixed very recently by this change:

commit 2007afd21b5f6c72a7a9c15fd7c4785331f2700f
Author:     Stefan Monnier <monnier@iro.umontreal.ca>
AuthorDate: Sat Feb 13 16:21:53 2021 -0500

So I'm closing this bug report.

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no