X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Feval.lisp;h=900e1aba850f59a938894c6c4560a6c9eca8833d;hb=4fc9d21ae1d8a6a2f8ff70f589d5da103203de13;hp=023b87623a57a4f8384cc4b1427d869845f41f62;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git

diff --git a/src/code/eval.lisp b/src/code/eval.lisp
index 023b876..900e1ab 100644
--- a/src/code/eval.lisp
+++ b/src/code/eval.lisp
@@ -9,10 +9,7 @@
 
 (in-package "SB!EVAL")
 
-(file-comment
-  "$Header$")
-
-;;; 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)