Skip to content
Snippets Groups Projects
Commit 6d974528 authored by ram's avatar ram
Browse files

In %INITIAL-FUNCTION, set initialize *GC-INHIBIT* to T and don't clear it. GC

must be at the end of worldload.
parent 93fa041f
No related branches found
No related tags found
No related merge requests found
......@@ -932,7 +932,7 @@
(defun %initial-function ()
"Gives the world a shove and hopes it spins."
(setq *already-maybe-gcing* t)
(setf *gc-inhibit* nil)
(setf *gc-inhibit* t)
(setf *need-to-collect-garbage* nil)
(%primitive print "In initial-function, and running.")
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment