From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 19 May 2005 15:39:56 +0000 (+0000)
Subject: (eval-when-compile): Doc fix.
X-Git-Tag: ttn-vms-21-2-B4~145
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8cd567b8429eebce6918d1350ce53ee142230530;p=emacs.git

(eval-when-compile): Doc fix.
---

diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el
index 1472d576e49..7fc01901cfe 100644
--- a/lisp/emacs-lisp/byte-run.el
+++ b/lisp/emacs-lisp/byte-run.el
@@ -175,8 +175,9 @@ If you think you need this, you're probably making a mistake somewhere."
 ;;; 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."
+  "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)))