Remove unnecessary cons in function-type property
* lisp/emacs-lisp/comp-common.el (comp-function-type-spec): Remove unnecessary car. * lisp/emacs-lisp/comp.el (comp--intern-func-in-ctxt): Likewise. * lisp/emacs-lisp/byte-run.el (byte-run--set-function-type): Update lambda list.
This commit is contained in:
parent
77f87d4b48
commit
f920959ac9
3 changed files with 3 additions and 3 deletions
|
@ -218,7 +218,7 @@ So far, FUNCTION can only be a symbol, not a lambda expression."
|
|||
val)))))
|
||||
|
||||
(defalias 'byte-run--set-function-type
|
||||
#'(lambda (f _args &rest val)
|
||||
#'(lambda (f _args val)
|
||||
(list 'function-put (list 'quote f)
|
||||
''function-type (list 'quote val))))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue