X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fcold-init-helper-macros.lisp;h=f34c5d918cd0638e99aa8bd4059073e663f25d99;hb=cd176690400f8b6fa23faa4dc6fa8494bcbce480;hp=8a7b9de1cefbb46216b542ca88302cb2627605fb;hpb=cea4896b2482b7b2b429c1631d774b4cfbc0efba;p=sbcl.git

diff --git a/src/code/cold-init-helper-macros.lisp b/src/code/cold-init-helper-macros.lisp
index 8a7b9de..f34c5d9 100644
--- a/src/code/cold-init-helper-macros.lisp
+++ b/src/code/cold-init-helper-macros.lisp
@@ -27,7 +27,7 @@
   #+sb-xc-host nil)
 
 ;;; Note: Unlike the analogous COLD-INIT macro in CMU CL, this macro
-;;; makes no attempt to simulate a top-level situation by treating
+;;; makes no attempt to simulate a top level situation by treating
 ;;; EVAL-WHEN forms specially.
 (defmacro !cold-init-forms (&rest forms)
   ;; In the target Lisp, stuff the forms into a named function which
@@ -52,8 +52,6 @@
 		    (makunbound '*cold-init-forms*)))
   #+sb-xc-host (declare (ignore name)))
 
-;;; FIXME: These macros should be byte-compiled.
-
 ;;; FIXME: Consider renaming this file asap.lisp,
 ;;; and the renaming the various things
 ;;;   *ASAP-FORMS* or *REVERSED-ASAP-FORMS*