[armedbear-cvs] r12276 - trunk/abcl/src/org/armedbear/lisp

[Erik Huelsmann]

Author: ehuelsmann
Date: Wed Nov 11 18:20:27 2009
New Revision: 12276

Log:
Further reduce forced loading of files: TOPLEVEL will be loaded
  when it's needed; embedded uses will skip loading it now.

Note: Hopefully, this reduces autoloading pressure on GAE.

Modified:
   trunk/abcl/src/org/armedbear/lisp/boot.lisp

Modified: trunk/abcl/src/org/armedbear/lisp/boot.lisp
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/boot.lisp	(original)
+++ trunk/abcl/src/org/armedbear/lisp/boot.lisp	Wed Nov 11 18:20:27 2009
@@ -186,7 +186,6 @@
       (resolve sym))))
 
 (unless (featurep :j)
-  (load-system-file "top-level")
   (unless *noinform*
     (%format t "Startup completed in ~A seconds.~%"
              (float (/ (ext:uptime) 1000)))))