Index: emacs/lisp/emacs-lisp/byte-run.el
diff -c emacs/lisp/emacs-lisp/byte-run.el:1.12
emacs/lisp/emacs-lisp/byte-run.el:1.13
*** emacs/lisp/emacs-lisp/byte-run.el:1.12 Thu May 5 22:58:40 2005
--- emacs/lisp/emacs-lisp/byte-run.el Thu May 19 15:39:56 2005
***************
*** 175,182 ****
;;; byte-compile-macro-environment.
(defmacro eval-when-compile (&rest body)
! "Like `progn', but evaluates the body at compile time.
! The result of the body appears to the compiler as a quoted constant."
(declare (debug t) (indent 0))
;; Not necessary because we have it in b-c-initial-macro-environment
;; (list 'quote (eval (cons 'progn body)))
--- 175,183 ----
;;; byte-compile-macro-environment.
(defmacro eval-when-compile (&rest body)
! "Like `progn', but evaluates the body at compile time if you're compiling.
! Thus, the result of the body appears to the compiler as a quoted constant.
! In interpreted code, this is entirely equivalent to `progn'."
(declare (debug t) (indent 0))
;; Not necessary because we have it in b-c-initial-macro-environment
;; (list 'quote (eval (cons 'progn body)))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
