Skip to content

Commit 3794389

Browse files
manphizWilfred
authored andcommitted
Check for interpreted-function-p
Emacs 30.x added interpreted-function which is different from byte-code-function, and hence helpful--signature will try to treat it like a lambda which will fail with ,---- | (wrong-type-argument listp #[(x) (x) (t) nil "Foo"]) `---- This patch adds tests for such case using interpreted-function-p when it's available.
1 parent 5ad8a9c commit 3794389

File tree

1 file changed

+3
-1
lines changed

1 file changed

+3
-1
lines changed

helpful.el

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2570,7 +2570,9 @@ For example, \"(some-func FOO &optional BAR)\"."
25702570
(cond
25712571
((symbolp sym)
25722572
(help-function-arglist sym))
2573-
((byte-code-function-p sym)
2573+
((or (byte-code-function-p sym)
2574+
(if (fboundp 'interpreted-function-p)
2575+
(interpreted-function-p sym)))
25742576
;; argdesc can be a list of arguments or an integer
25752577
;; encoding the min/max number of arguments. See
25762578
;; Byte-Code Function Objects in the elisp manual.

0 commit comments

Comments
 (0)