comparison lisp/emacs-lisp/byte-opt.el @ 37904:2ec445400397

(byte-compile-inline-expand): Undo last change.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sun, 27 May 2001 11:00:59 +0000
parents 4a5ea0885c7b
children a8fffaec8725
comparison
equal deleted inserted replaced
37903:a60b297f2679 37904:2ec445400397
263 (byte-compile-warn "Attempt to inline `%s' before it was defined" 263 (byte-compile-warn "Attempt to inline `%s' before it was defined"
264 name) 264 name)
265 form) 265 form)
266 ;; else 266 ;; else
267 (when (and (consp fn) (eq (car fn) 'autoload)) 267 (when (and (consp fn) (eq (car fn) 'autoload))
268 (load (nth 1 fn)) 268 (load (nth 2 fn))
269 (setq fn (or (and (fboundp name) (symbol-function name)) 269 (setq fn (or (and (fboundp name) (symbol-function name))
270 (cdr (assq name byte-compile-function-environment))))) 270 (cdr (assq name byte-compile-function-environment)))))
271 (if (and (consp fn) (eq (car fn) 'autoload)) 271 (if (and (consp fn) (eq (car fn) 'autoload))
272 (error "File `%s' didn't define `%s'" (nth 2 fn) name)) 272 (error "File `%s' didn't define `%s'" (nth 2 fn) name))
273 (if (symbolp fn) 273 (if (symbolp fn)