X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Feval.lisp;h=900e1aba850f59a938894c6c4560a6c9eca8833d;hb=b19093fa94d6e1785abee99c35c9a610e8777671;hp=879125c71dde4cc9b008e19a86076459d6fead73;hpb=cea4896b2482b7b2b429c1631d774b4cfbc0efba;p=sbcl.git

diff --git a/src/code/eval.lisp b/src/code/eval.lisp
index 879125c..900e1ab 100644
--- a/src/code/eval.lisp
+++ b/src/code/eval.lisp
@@ -9,7 +9,7 @@
 
 (in-package "SB!EVAL")
 
-;;; This flag is used by EVAL-WHEN to keep track of when code has already been
-;;; evaluated so that it can avoid multiple evaluation of nested EVAL-WHEN
-;;; (COMPILE)s.
+;;; This flag is used by EVAL-WHEN to keep track of when code has
+;;; already been evaluated so that it can avoid multiple evaluation of
+;;; nested EVAL-WHEN (COMPILE)s.
 (defvar *already-evaled-this* nil)