aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/emacs-lisp/byte-opt.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/byte-opt.el')
-rw-r--r--lisp/emacs-lisp/byte-opt.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index e00bebc91d5..856a31551df 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1,6 +1,7 @@
1;;; byte-opt.el --- the optimization passes of the emacs-lisp byte compiler 1;;; byte-opt.el --- the optimization passes of the emacs-lisp byte compiler
2 2
3;; Copyright (c) 1991,1994,2000,01,02,2004 Free Software Foundation, Inc. 3;; Copyright (c) 1991, 1994, 2000, 2001, 2002, 2004
4;; Free Software Foundation, Inc.
4 5
5;; Author: Jamie Zawinski <jwz@lucid.com> 6;; Author: Jamie Zawinski <jwz@lucid.com>
6;; Hallvard Furuseth <hbf@ulrik.uio.no> 7;; Hallvard Furuseth <hbf@ulrik.uio.no>
@@ -266,7 +267,7 @@
266 (cdr (assq name byte-compile-function-environment))))) 267 (cdr (assq name byte-compile-function-environment)))))
267 (if (and (consp fn) (eq (car fn) 'autoload)) 268 (if (and (consp fn) (eq (car fn) 'autoload))
268 (error "File `%s' didn't define `%s'" (nth 1 fn) name)) 269 (error "File `%s' didn't define `%s'" (nth 1 fn) name))
269 (if (symbolp fn) 270 (if (and (symbolp fn) (not (eq fn t)))
270 (byte-compile-inline-expand (cons fn (cdr form))) 271 (byte-compile-inline-expand (cons fn (cdr form)))
271 (if (byte-code-function-p fn) 272 (if (byte-code-function-p fn)
272 (let (string) 273 (let (string)
@@ -2032,5 +2033,5 @@ If FOR-EFFECT is non-nil, the return value is assumed to be of no importance."
2032 byte-optimize-lapcode)))) 2033 byte-optimize-lapcode))))
2033 nil) 2034 nil)
2034 2035
2035;;; arch-tag: 0f14076b-737e-4bef-aae6-908826ec1ff1 2036;; arch-tag: 0f14076b-737e-4bef-aae6-908826ec1ff1
2036;;; byte-opt.el ends here 2037;;; byte-opt.el ends here