diff --git a/compiler/globaldb.lisp b/compiler/globaldb.lisp
index 986a0837db7f84638e98028a021ed967c440c6ac..c6c192cf046b13e41572e185d6d4cf6e0fa734ca 100644
--- a/compiler/globaldb.lisp
+++ b/compiler/globaldb.lisp
@@ -477,11 +477,12 @@
 	 #x3FF)))
 
 
-(eval-when (compile #-new-compiler load eval)
+(eval-when (compile load eval)
 
 ;;; INFO-CACHE-INIT  --  Internal
 ;;;
 ;;;    Set up the info cache.  This is also called in GLOBALDB-INIT.
+;;;
 (defmacro info-cache-init ()
   `(progn
      (setq *cached-info-environment* nil)
@@ -493,7 +494,7 @@
 
 (info-cache-init)
 
-); Eval-When (Compile Eval)
+); Eval-When (Compile Load Eval)
 
 
 ;;; Whenever we GC, we must blow away the INFO cache, otherwise values might