diff --git a/tools/worldload.lisp b/tools/worldload.lisp
index bbf868902efccdcdafe8db5c1277647819fd7f8e..9f04018f9c45d08fd134b2b6c14b95f844254312 100644
--- a/tools/worldload.lisp
+++ b/tools/worldload.lisp
@@ -58,7 +58,6 @@
 (load "assem:rompconst")
 (load "assem:disassemble")
 
-
 (load "c:loadcom.lisp")
 
 (setq lisp::original-lisp-environment NIL)
@@ -164,6 +163,4 @@
 				extensions:save-lisp
 				,lisp::fop-codes
 				compile-file)
-	     :init-function #'(lambda ()
-				(gc-on)
-				(abort))))
+	     :init-function #'lisp::world-load-init-function))