1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 10:31:37 -08:00

(byte-compile-file): Return nil on failure.

This commit is contained in:
Karl Heuer 1994-02-23 19:17:57 +00:00
parent 1c1fce3feb
commit a2bb8f73f2

View file

@ -1200,8 +1200,8 @@ With prefix arg (noninteractively: 2nd arg), load the file after compiling."
(save-excursion (save-excursion
(display-call-tree filename))) (display-call-tree filename)))
(if load (if load
(load target-file)))) (load target-file))
t) t)))
;;(defun byte-compile-and-load-file (&optional filename) ;;(defun byte-compile-and-load-file (&optional filename)
;; "Compile a file of Lisp code named FILENAME into a file of byte code, ;; "Compile a file of Lisp code named FILENAME into a file of byte code,