Skip to content
Snippets Groups Projects
Commit 44f6342e authored by ram's avatar ram
Browse files

Flushed hacking on *ALREADY-MAYBE-GCING*. Instead, we call GC-ON in the

SAVE-LISP init function.
parent 6d974528
No related branches found
No related tags found
No related merge requests found
......@@ -12,9 +12,7 @@
;;; the resulting core image. It writes "lisp.core" in the DEFAULT-DIRECTORY.
;;;
;;; Turn of GC so bad things don't happen.
;;;
(setq lisp::*already-maybe-gcing* t)
#| Can't eval conditionals now...
;;; Setup some packages.
;;;
......@@ -148,7 +146,6 @@
(setq ** NIL)
(setq +++ NIL)
(setq *** NIL)
(setq lisp::*already-maybe-gcing* t)
(setq *load-verbose* nil)
(setq *info-environment*
(list (make-info-environment :name "Working")
......@@ -161,4 +158,6 @@
extensions:save-lisp
,lisp::fop-codes
compile-file)
:init-function #'abort))
:init-function #'(lambda ()
(gc-on)
(abort))))
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment