aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/bytecomp.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 9618deddfa3..8107571d032 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -9,7 +9,7 @@
9 9
10;;; This version incorporates changes up to version 2.10 of the 10;;; This version incorporates changes up to version 2.10 of the
11;;; Zawinski-Furuseth compiler. 11;;; Zawinski-Furuseth compiler.
12(defconst byte-compile-version "$Revision: 2.48 $") 12(defconst byte-compile-version "$Revision: 2.49 $")
13 13
14;; This file is part of GNU Emacs. 14;; This file is part of GNU Emacs.
15 15
@@ -220,10 +220,10 @@ if you change this variable."
220 (setq filename (byte-compiler-base-file-name filename)) 220 (setq filename (byte-compiler-base-file-name filename))
221 (setq filename (file-name-sans-versions filename)) 221 (setq filename (file-name-sans-versions filename))
222 (cond ((eq system-type 'vax-vms) 222 (cond ((eq system-type 'vax-vms)
223 (concat (substring filename 0 (string-match ";" filename)) "c")) 223 (concat (substring filename 0 (string-match ";" filename)) "c"))
224 ((string-match emacs-lisp-file-regexp filename) 224 ((string-match emacs-lisp-file-regexp filename)
225 (concat (substring filename 0 (match-beginning 0)) ".elc")) 225 (concat (substring filename 0 (match-beginning 0)) ".elc"))
226 (t (concat filename ".elc"))))) 226 (t (concat filename ".elc")))))
227 227
228;; This can be the 'byte-compile property of any symbol. 228;; This can be the 'byte-compile property of any symbol.
229(autoload 'byte-compile-inline-expand "byte-opt") 229(autoload 'byte-compile-inline-expand "byte-opt")