(byte-compile-declare-function): Third argument to declare-function

must be a list to specify arglist.
This commit is contained in:
Glenn Morris 2007-11-30 07:45:18 +00:00
parent 7b58c351cf
commit abc11cbb56

View file

@ -2823,7 +2823,8 @@ If FORM is a lambda or a macro, byte-compile it as a function."
(put 'declare-function 'byte-hunk-handler 'byte-compile-declare-function)
(defun byte-compile-declare-function (form)
(push (cons (nth 1 form)
(if (< (length form) 4) ; arglist not specified
(if (or (< (length form) 4) ; arglist not specified
(not (listp (nth 3 form))))
t
(list 'declared (nth 3 form))))
byte-compile-function-environment)