[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/bytecomp.el

[Richard M. Stallman]

Index: emacs/lisp/emacs-lisp/bytecomp.el
diff -c emacs/lisp/emacs-lisp/bytecomp.el:2.98 
emacs/lisp/emacs-lisp/bytecomp.el:2.99
*** emacs/lisp/emacs-lisp/bytecomp.el:2.98      Wed May 29 12:38:46 2002
--- emacs/lisp/emacs-lisp/bytecomp.el   Sat Jun 15 16:37:01 2002
***************
*** 10,16 ****
  
  ;;; This version incorporates changes up to version 2.10 of the
  ;;; Zawinski-Furuseth compiler.
! (defconst byte-compile-version "$Revision: 2.98 $")
  
  ;; This file is part of GNU Emacs.
  
--- 10,16 ----
  
  ;;; This version incorporates changes up to version 2.10 of the
  ;;; Zawinski-Furuseth compiler.
! (defconst byte-compile-version "$Revision: 2.99 $")
  
  ;; This file is part of GNU Emacs.
  
***************
*** 1309,1320 ****
  This is if a `.elc' file exists but is older than the `.el' file.
  Files in subdirectories of DIRECTORY are processed also.
  
! If the `.elc' file does not exist, normally the `.el' file is *not* compiled.
! But a prefix argument (optional second arg) means ask user,
! for each such `.el' file, whether to compile it.  Prefix argument 0 means
! don't ask and compile the file anyway.
  
! A nonzero prefix argument also means ask about each subdirectory.
  
  If the third argument FORCE is non-nil,
  recompile every `.el' file that already has a `.elc' file."
--- 1309,1321 ----
  This is if a `.elc' file exists but is older than the `.el' file.
  Files in subdirectories of DIRECTORY are processed also.
  
! If the `.elc' file does not exist, normally this function *does not*
! compile the corresponding `.el' file.  However,
! if ARG (the prefix argument) is 0, that means do compile all those files.
! A nonzero ARG means ask the user, for each such `.el' file,
! whether to compile it.
  
! A nonzero ARG also means ask about each subdirectory before scanning it.
  
  If the third argument FORCE is non-nil,
  recompile every `.el' file that already has a `.elc' file."
***************
*** 3748,3754 ****
    (or command-line-args-left
        (setq command-line-args-left '(".")))
    (while command-line-args-left
!     (byte-recompile-directory (car command-line-args-left) 0)
      (setq command-line-args-left (cdr command-line-args-left)))
    (kill-emacs 0))
  
--- 3749,3755 ----
    (or command-line-args-left
        (setq command-line-args-left '(".")))
    (while command-line-args-left
!     (byte-recompile-directory (car command-line-args-left))
      (setq command-line-args-left (cdr command-line-args-left)))
    (kill-emacs 0))