* lisp/emacs-lisp/bytecomp.el: Check existence of f in #'f.

(byte-compile-callargs-warn): Use `push'.
(byte-compile-arglist-warn): Ignore higher-order "calls".
(byte-compile-file-form-autoload): Use `pcase'.
(byte-compile-function-form): If quoting a symbol, check that it exists.
This commit is contained in:
Stefan Monnier 2013-08-07 13:33:30 -04:00
parent e5eefe9b96
commit bb41480a68
3 changed files with 64 additions and 39 deletions

View file

@ -83,7 +83,6 @@ The return value of this function is not used."
(list 'quote f) (list 'quote new-name) (list 'quote when))))
(list 'compiler-macro
#'(lambda (f args compiler-function)
;; FIXME: Make it possible to just reuse `args'.
`(eval-and-compile
(put ',f 'compiler-macro
,(if (eq (car-safe compiler-function) 'lambda)