comparison lisp/emacs-lisp/bytecomp.el @ 83019:82c3b4da43ca

Merged in changes from CVS HEAD Patches applied: * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-33 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-34 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-35 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-36 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-37 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-38 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-39 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-40 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-41 Make fringe-drawing stuff compile without a window-system * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-42 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-43 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-44 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-45 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-46 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-47 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-48 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-49 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-50 Update from CVS git-archimport-id: [e-mail]--2004/emacs--multi-tty--0--patch-59

83018:1465425fe2d3

;; Maintainer: FSF
;; Keywords: lisp

;;; This version incorporates changes up to version 2.10 of the
;;; Zawinski-Furuseth compiler.
(defconst byte-compile-version "$Revision: 2.139 $")

;; This file is part of GNU Emacs.

;; GNU Emacs is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by

;;  + the ability to generate a histogram of functions called.

;; User customization variables:
;;
;; byte-compile-verbose	Whether to report the function currently being
;;				compiled in the minibuffer;
;; byte-optimize		Whether to do optimizations; this may be
;;				t, nil, 'source, or 'byte;
;; byte-optimize-log		Whether to report (in excruciating detail)
;;				exactly which optimizations have been made.
;;				This may be t, nil, 'source, or 'byte;

;;		(inline			;;  `foo' and `baz' will be
;;		 (foo 1 2 3 (bar 5))	;; open-coded, but `bar' will not.
;;		 (baz 0))
;;
;;  o	It is possible to open-code a function in the same file it is defined
;;	in without having to load that file before compiling it.  the
;;	byte-compiler has been modified to remember function definitions in
;;	the compilation environment in the same way that it remembers macro
;;	definitions.
;;
;;  o  Forms like ((lambda ...) ...) are open-coded.

;;; compiling a single function
;;;###autoload
(defun compile-defun (&optional arg)
  "Compile and evaluate the current top-level form.
Print the result in the minibuffer.
With argument, insert value in current buffer after the form."
  (interactive "P")
  (save-excursion
    (end-of-defun)
    (beginning-of-defun)

83019:82c3b4da43ca

;; Maintainer: FSF
;; Keywords: lisp

;;; This version incorporates changes up to version 2.10 of the
;;; Zawinski-Furuseth compiler.
(defconst byte-compile-version "$Revision: 2.141 $")

;; This file is part of GNU Emacs.

;; GNU Emacs is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by

;;  + the ability to generate a histogram of functions called.

;; User customization variables:
;;
;; byte-compile-verbose	Whether to report the function currently being
;;				compiled in the echo area;
;; byte-optimize		Whether to do optimizations; this may be
;;				t, nil, 'source, or 'byte;
;; byte-optimize-log		Whether to report (in excruciating detail)
;;				exactly which optimizations have been made.
;;				This may be t, nil, 'source, or 'byte;

;;		(inline			;;  `foo' and `baz' will be
;;		 (foo 1 2 3 (bar 5))	;; open-coded, but `bar' will not.
;;		 (baz 0))
;;
;;  o	It is possible to open-code a function in the same file it is defined
;;	in without having to load that file before compiling it.  The
;;	byte-compiler has been modified to remember function definitions in
;;	the compilation environment in the same way that it remembers macro
;;	definitions.
;;
;;  o  Forms like ((lambda ...) ...) are open-coded.

;;; compiling a single function
;;;###autoload
(defun compile-defun (&optional arg)
  "Compile and evaluate the current top-level form.
Print the result in the echo area.
With argument, insert value in current buffer after the form."
  (interactive "P")
  (save-excursion
    (end-of-defun)
    (beginning-of-defun)