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))