summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/bytecomp.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2019-06-01 12:04:42 -0700
committerGlenn Morris <rgm@gnu.org>2019-06-01 12:04:42 -0700
commit7e911d007d25df9a483eaad54956a4273405574e (patch)
treece1e4b0eda6c940634922e71a726b5c8aa5270b4 /lisp/emacs-lisp/bytecomp.el
parentf17e0e93bd8dbe3b069029585dc5d2dda57c1e1e (diff)
parent134edc10367a8434167656e631865c85b5f10c42 (diff)
downloademacs-7e911d007d25df9a483eaad54956a4273405574e.tar.gz
emacs-7e911d007d25df9a483eaad54956a4273405574e.tar.bz2
emacs-7e911d007d25df9a483eaad54956a4273405574e.zip
Merge from origin/emacs-26
134edc1 Warn about wrong number of args for subrs (Bug#35767) 5f01af6 Use plain symbols for eieio type descriptors (Bug#29220) 4b24b01 Pacify GCC 9 -Wredundant-decls
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
-rw-r--r--lisp/emacs-lisp/bytecomp.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index ce348ed3131..dfbda8d43e3 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1401,7 +1401,7 @@ when printing the error message."
(defun byte-compile-callargs-warn (form)
(let* ((def (or (byte-compile-fdefinition (car form) nil)
(byte-compile-fdefinition (car form) t)))
- (sig (byte-compile--function-signature def))
+ (sig (byte-compile--function-signature (or def (car form))))
(ncall (length (cdr form))))
;; Check many or unevalled from subr-arity.
(if (and (cdr-safe sig)