bug#70654: 30.0.50; defadvice bug (?)

[Eli Zaretskii]

> From: OGAWA Hirofumi <hirofumi@mail.parknet.co.jp>
> Date: Tue, 30 Apr 2024 04:05:32 +0900
> 
> 
> This may not be the way to reproduce though,
> 
>   $ emacs -Q
>   M-x package-initialize
> 
>   Then evaluates the following
> 
> (defun test ()
>   (defadvice yank-pop (around kill-ring-browse-maybe (arg))
>     (interactive "p"))
>   (ad-activate 'yank-pop))
> (test)
> 
>   With above, *Compile-Log* buffer contains,
> 
>  Error: Wrong type argument: arrayp, (lambda (ad--addoit-function arg) 
> (interactive "p") (let (ad-return-value) nil ad-return-value))
> 
> I suspect the commit id f2bccae22bd47a2e7e0937b78ea06131711b935a (Use
> a dedicated type to represent interpreted-function values)

CC'ing Stefan.