mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-24 14:30:43 -08:00
Code Issues Projects Releases Wiki Activity

(byte-compile-file): Doc fix.

Browse source 
(batch-byte-compile-file): Return what byte-compile-file returns.
This commit is contained in:
Richard M. Stallman 1997-06-22 23:08:47 +00:00
parent f846bc3668
commit 1c57117e75
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/emacs-lisp/bytecomp.el
View file

@ -10,7 +10,7 @@
;;; This version incorporates changes up to version 2.10 of the
;;; Zawinski-Furuseth compiler.
(defconst byte-compile-version "$Revision: 2.28 $")
(defconst byte-compile-version "$Revision: 2.29 $")
;; This file is part of GNU Emacs.
@ -1203,7 +1203,8 @@ recompile every `.el' file that already has a `.elc' file."
(defun byte-compile-file (filename &optional load)
"Compile a file of Lisp code named FILENAME into a file of byte code.
The output file's name is made by appending `c' to the end of FILENAME.
With prefix arg (noninteractively: 2nd arg), load the file after compiling."
With prefix arg (noninteractively: 2nd arg), load the file after compiling.
The value is t if there were no errors, nil if errors."
;; (interactive "fByte compile file: \nP")
(interactive
(let ((file buffer-file-name)
@ -3317,7 +3318,7 @@ For example, invoke \"emacs -batch -f batch-byte-compile $emacs/ ~/*.el\""
(defun batch-byte-compile-file (file)
(condition-case err
(progn (byte-compile-file file) t)
(byte-compile-file file)
(error
(message (if (cdr err)
">>Error occurred processing %s: %s (%s)"